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Preface 


This book provides an introduction to BASIC program¬ 
ming language. The book is systematically organized to help 
in the learning of the language. This tfook could be used by 
anyone. That is, it does not require any prior knowledge of 
a computer language or computer hardware. It starts out with 
a general discussion of computer hardware and software, and 
then develops the language starting with the basic rules and 
then developing applications of the language using business 
and non-business problems. 

In this book, every BASIC programming concept is 
developed and discussed using programming example, and 
practical applications. In addition, the concepts of struc¬ 
tured and unstructured programming are discussed. The book 
first discusses the rules of BASIC language and then 
presents the programming techniques. After presenting the 
programming rules and programming techniques, the book 
covers INPUT, READ, PRINT, GOTO, FOR...NEXT, and logical 
statements. It also discusses extensively the creation and 
the manipulation of computer files. 

Unlike other computer languages, BASIC is not stand¬ 
ardized. That is, each computer vendor develops its own 
language rules. Therefore, the BASIC used on an IBM system, 
for example, may not follow the same rules as that of the 
Control Data Corporation (CDC) system. This is even true of 
microcomputers. Each BASIC uses different rules. As a re¬ 
sult no book could cover completely the rules needed for 
eachBASIC on the market. However, this book covers the most 
common versions of the BASIC language and, in some cases, 
also provides a list of possible variations among BASIC. 
Hence it will be advisable to use the features covered in 
this book on your system; and if they do not work, check 
your system's manual for an appropriate method. 


Syed Shahabuddin 
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CHAPTER 1 


COMPUTER SYSTEMS 


INTRODUCTION 

In the 1960's and 1970's, the world was in the midst 
of a computer revolution that overshadowed the Industrial 
Revolution. The Computer Revolution has already affected 
everyday life and has greater potential to impact lives of 
people in many different ways, predictable and unpredict¬ 
able. The effects on everyday life can be seen in many ways. 
In education, computer-assisted instructions (CAI) are 
becoming common. The CAI allow a student to learn at his own 
pace without requiring the assistance of a teacher. Many 
medical diagnoses are done through computer. Many bank 
transactions are conducted through computer without human 
intervention such as bank teller machines, electronic fund 
transfer etc. The possibility that in the future robots will 
be performing most of the work done by humans has been made 
possible by computers. That is, the field of artificial 
intelligence (i.e. computers think as humans) has made this 
phenomenon possible. 

The term computer is used so casually that many people 
do not know what it means. Businesses use computers for 
payroll, billing, inventory, accounting, personnel, custom¬ 
ers' records, and information systems. Computers have become 
an integral part of business, commerce, industry, and educa¬ 
tion. Computers come in a variety of shapes, sizes, and 
prices to meet any need. 

Since the late 1970's, microcomputers have impacted 
social and educational systems. That is, microcomputers have 
found widespread acceptance in many areas of educational, 
industrial, and home environments. Microcomputers cost as 
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little as $300 to as much as $6000. On the other hand, 
large, medium, or mini computers cost between $10,000 and 
$1,000,000. 


COMPUTER SYSTEMS COMPONENTS 

Each computer system use mentioned requires both the 
computer and several output and input devices as well soft¬ 
ware. 

Hardware 

Hardware is the name of the the physical devices that 
comprise the computer system: the central processing (CPU), 
the input devices, the output devices, and the secondary 
storage devices. Hardware is not operating systems or other 
software (programs). Hardware includes all parts of the 
computer one can see. 

Computer hardware consists of the following four components: 

1. Central Processing Unit (CPU) 

2. Input Units 

3. Output Units 

4. Secondary Storage Devices 




PRIMARY 

MEMORY 

STORAGE 



INPUT 


ALU / CL 

— —-^ 

OUTPUT 





CU 




CENTRAL PROCESSING UNIT(CPU) 


Figure 1.1 : Computer System Configuration 
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Micro Computer 
(Personal Computer) 


Monitor 


Keyboard 



CPU 

Drive 
(Full Height) 


Figure 1.2 : Personal Computer (PC) 
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TERMINAL 


DISPLAY 

(Output) 

KEYBOARD 

(Input) 



PRINTER 

(Output) 


P P P P DISK 



roioiroio] 

fflml 


TAPE 

(I/O) 



PROCESSOR 


OPTICAL SCANNER 
(Input) 


MICR 

(Input) 


AUDIO RESPONSE 
(Output) 


Figure 1.3 : Large Computer (mainframe) 
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The central processing unit (CPU) is like the brain of 
a human e ^ n 9* The CPU is composed of three separate units 

cont . ro1 uni t (CU) , the arithmetic/logic unit (ALU) , 
and the primar^r storage unit (memory). The control unit 
tells the computer what to do. That is, it controls the 
operations of the computer. It reads the instructions from 
anC ^ , te H s the other components of the computer 
what to do. It instructs the appropriate input device to 
send the needed data. It keeps a record of what parts of the 
program have been executed and which are still to be done. 
It informs the arithmetic/logic unit of calculations that 
need to be performed, it instructs the computer to store 
data in the primary memory or secondary storage. It in¬ 
structs the computer to print the output on the designated 
output devices. 

(The arithmetic/logic unit (ALU) executes arithmetic 
and logic statements. A logic statement makes a comparison 
of two or more conditions and then performs action based on 
the result. Based on the instruction of the data, it per¬ 
forms arithmetic calculations and temporarily stores the 
data and the results. 

The primary storage unit temporarily stores programs 
and data in the internal memory of the computer. This unit 
stores the program that is being executed as well as data 
needed by the program. It also stores intermediate results 
of any calculations as well as the output to be printed when 
the output device is not ready. This memory is different for 
the external memory, called auxiliary storage. The internal 
memory is part of the actual internal hardware of the com¬ 
puter. A computer cannot perform without a primary memory. A 
CPU can access only primary storage. 

The size of computer memory is described in K's 
(Kilobytes); a K is 1,024 bytes (characters). A byte is a 
group of bits (feinary digit) that forms one character. A 
character is a letter, digit, or special symbol. Some sys¬ 
tems use American Standard Code for Information Interchange 
(ASCII) codes to form a byte, while IBM systems use extended 
binary coded decimal interchange code (EBCDIC) for forming a 
byte (see Appendix A). A computer with a CPU which could 
store a large quantity of information (50-million characters 
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or more at a time) is considered a large (or maintrame) 
computer. Minicomputers usually can store less 
million characters at a time. Most microcomputers have the 
capability to store somewhere between 640 thousan ^ ' 

four million (4 mega) characters at a time. A ml £ro Q f P this 
with 640K has 640 thousand bytes memory. A compute 
size can store up to 640 thousand characters a a 

There are two types of internal memories: ROM and RAM. 
Read-Only memory (ROM) is a memory chip which the programmer 
cannot change, because it has built-in soflsome 
firmware) which operates the computer or_ P d 

built-in functions. ROM instructions are hard wired an , 
therefore, cannot be changed or deleted without « /***!*£ a 
change in the circuits. For example, the IBMPC has a 
built-in BASIC Input-Output System. Theref ^ et i nto 
turned on without its operating system, the PC will get mt 
BIOS 6 directly. A version of ROM, called programmable read¬ 
only memory (PROM), can be programmed 1 r or 

hard-wired. PROM is either programmed by the manufacturer or 
it can be shipped blank to be programmed by a user. 

On the other hand, Random-Access Memory (RAM) 1S 
maior type of memory used in primary storage. It is used by 
the computer to store new software or information. It does 
«ot store information permanently. Once a new program is 
read into the computer, the old programs and data files are 
erased Also, when the computer is turned off, all the 
software and data files, except those in ROM, are erased. 


auxiliary devices 


secondary storage 

Computers have to store information for future use. 
mi rroconouters use diskettes, hard disks, cassette tape, and 
onM to store information. The most common storage devices 
used for storing the output of a program are : 

» Disk Drives 


i) Floppy diskettes 

ii) Hard disks 

iii) Disk packs 
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b. Tapes 

i) Magnetic Tapes 
ii) Cassette Tapes 


Floppy diskettes, used only in microcomputers, can 
store information permanently (unless erased). The diskettes 
come in 3 sizes — 3 1/2, 5 1/4 or 8 1/2 inches. Most of the 
PC diskettes are 5 1/4 or 3 1/4 inches. Each size can store 
J"° 360 K, 720K, 1.2MB. Each size comes in either a 

double-sided double density (DSDD) or a single sided double 
density (SSDD). Density refers to the number of bytes a disk 
can store on a single track. A track is a circular portion 
of a disk on which data can be written. The PC's DS diskette 
writes 40 tracks per side. Obviously, to use diskettes, the 
PC must have a disk drive. The disk drive comes in half¬ 
height or full-height. Regardless of the height, it can 
store the same amount of information on a diskette. The 
advantage of the half height drive is that a user could put 
two half-height disk drives on one side and an internal hard 
drive on the other side in a computer. 
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Hard disks, 

in 20, 30, 40, or 
outside or inside 


commonly used with microcomputers cone 
50 million bytes (MB) and can be installed 
of the computer. 


I 



Disk Drive Internal 

(Half Height) Hard Drive 


Figure 1.5: Hard Disk with Disk Drives 


A magnetic disk is a metal platter coated on both 
ides with magnetized material. A magnetic disk resembles a 
ohonograph record with smooth surface instead of groves. It 
operates in a way very similar to the use of phonograph 
record. That is, the disk rotates while a read/write head is 
s i t io ne d above the magnetic surface. The data is stored as 
a magnetized spot on each track. A track is concentric 
drcle on each surface. A typical disk has 200 tracks on 
each surface. 
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plastic 

Magnetic Tape is a continuousi strip ig 1/2 _ inc h wide 
tape wound onto a reel. Normally, 1200, or 2400 feet, 

and can be purchased in leng f£ ° f bvtes ' That is, 600 feet of 
An inch of tape could store ieOO bytes, i 11#52 0,000 bytes 
tape could store up to (600 x 12 x records. Magnetic 

per tape without any gaps ‘’^"^f^puters. 
tape can be used only on large or 




Magnetic 

Coating 


Figure 1.8 : Magnetic Tape 


Cassette tapes, used commonly on microcomputers, can 
iso store information. They look like those used in audio 
recording. However, this is not commonly used. 
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Figure 1.9 


Cassette Tape 


Output Devices 

The output of the processed data can be presented in 
several ways that suit the user's needs. That is, it can be 
presented on the monitor, called soft copy, or printed, 
called hard copy. The users should be able to determine 
which output device best suits their needs. 

One of the output devices is the printer. Printers can 
be used to print out information and come in a variety of 
qualities, speeds, and sizes. Among the printers, there are 
dot-matrix, chain printers, and laser printers, to name a 
few. Each type of printer serves certain uses. 

An output device, called visual display, is commonly 
used for most output. That is, information sent from the 
computer is displayed on monitor. A monitor (CRT) is an 
essential part of a computer. The display terminals are 
equipped with a keyboard which allows one to see what is 
inputted or what the computer outputs. The display devices 
can be dumb or intelligent terminals. Intelligent terminals 
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allow editing and formatting data entry, 

nals simply accept what is inputted or outputted. Display 
terminals can be cathode ray tube ( C ** T) 0 CRT use liqht _ 
uses television-like presentation, while n :? 

emitted diode (LED) display. There are a variety,°r/SraDhic 
available to choose from. They come in color, /9 P > 

monochrome or monochrome/graphic. 


Input Media 

Computers can accept input from the following .media. 

1. Keyboards 

2. Disks 

3. Cassette Tapes 

4. Magnetic Tapes 


Disks, magnetic tapes and cassette tapes have already 
been discussed. Keyboard, the essential component of any 
microcomputer or CRT, allows one to enter information, 
instructs a computer, and responds to the computer query. 
The keyboard of a PC is similar to typewriter. However, the 
configuration is not the same. Most keyboards have function 
keys which allow programmers to make inquiries by using one 
key programmed instruction to perform specific tasks. 





Figure l.n : Keyboard 
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The PC keyboard has three major sets of keys. 

1. Function keys are positioned on the left and are 

labeled FI through F10. Each software defines each 
function key for different purposes. Usually, the 
software will show the use of the function keys 
somewhere on the screen (monitor). The use of a 
function key simply requires pressing the key 
down. The advantage of a function is that it 
usually replaces a command. For example, instead 
of typing the command Save, one can simply use the 
assigned function key. 

2. Numeric keys, positioned on the right, are called 

numeric pads and are labeled 0 through 9, 
(decimal), Home, Pg Up, Pg Dn, End, Home, Del, 
Ins, and four arrows, one for each direction. The 
numeric key can be activated by holding the shift 
(/^ ) key and pressing the appropriate key or 
pressing the Num Lock key once and using all the 
upper case keys on the numeric pad. The lower case 
of some of the numeric keys are the arrow keys. 
The arrow keys are commonly used for the cursor 
movement. Cursor movement is the changing of the 
position of cursor to allow the entry of value 
into a location. These keys allow the movement of 
^ cursor in four directions. Some software will 
not allow the use of the arrow for cursor 
movement. One should try them and check to see if 
these keys are operational. 


Software 

In the previous sections, computers were discussed as 
nieces of equipment. However, computer systems require 
software to run the hardware. The hardware cannot do any- 
thina without software. Software is a program which tells 
computers what to do and how to do it. Without software 
computers are just pieces of equipment which will have no 

use. 
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Programs are sets of logical instruc i either 

form certain functions. Programs are classi perform 

application or system programs. Application p g ecords 

specific functions such as payroll, personnel records , 

inventory record, accounts receivable, accoun aDDlication 
other business related functions. Most of nnp Ltions of 
programs are written to help businesses ^ operatxons of 

the business. Such programs are either wn nrnfira nis are 

purchased from vendors. Most of the applica ^ such as 

written in one of the high-level computer^ iang g , usg 

BASIC, FORTRAN, COBOL, PL/1, or RPG. These 1 99 d 

English language like rules, and, therefore-’ do nQt 

easy to understand by humans. However, c P be con _ 

understand these language. Therefore, ey ftware This 
verted into the computer language by other ^ware. This 
conversion software's part of the operating system s soft 

ware. 

System software or system program are programs which 
direct the internal operation of the computer. Most o 
system software is provided by computer hardware vendors. 
One of the pieces of the software is the operating system 
fOS) . The OS consists of programs that supervise the proc 
essing of the application programs from the time it is read 
to the time it is completed. It instructs the computer what 
computer resources are needed by the program, searches for 
the data and processes the output and input of the program. 
However ’ the main purpose of the OS is to reduce the proc¬ 
essing cost by increasing the use of the various components 
of the computer and reducing the lost time. 

The system software must include compiler. A compiler 
translates application programs into machine-readable lan¬ 
guage. That is, instructions written by the programmer, 
called the source program, must be converted into machine- 
readable form by compiler. The machine-readable, called the 
object program, is the program the computer uses for execu¬ 
tion. Without a compiler, no application programs can be 
run on a computer unless they are already compiled by some 
other computer system. However, BASIC language requires 
either an interpreter or a compiler for converting it into a 
machirte-readable language. Interpreters also translate 
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high-level computer languages one line at a time. That is, 
when the programmer types each line of the program, it is 
checked for error right away. 


Programming 


The purpose of a language is communication. Communica¬ 
tion is necessary for giving instructions and passing infor¬ 
mation. Therefore, people have developed languages like 
Urdu, Pushto, Punjabi, Sindhi or English to make this proc¬ 
ess possible. Computer languages are developed to achieve 
the same objectives. Just as there are thousands of human 
languages in the world, there are at least twelve languages 
for communicating with computers. However, just as in the 
real world not everyone understands every one language, so 
also not every computer understands all computer languages 
yet. But unlike human beings, every computer will understand 
every computer language in the future. 


Regardless of the computer language used, the computer 
is still a piece of equipment. It has to be told what to do. 
Unless human beings could write a computer program in which 
we tell the computer how to solve the problem, the computer 
is not capable of solving the problem. That is, we have to 
direct the computer what to do. Therefore, programming is a 
process of writing instructions in a computer language that 
will produce the desired results. Programming involves 
defining the problem, writing a sequence of instructions, 
and converting these instructions into computer language 
instructions. After writing a program in one of the computer 
lanquaqes it is compiled and then run by the computer to 
produce the desired results. The programming process will be 
discussed in more detail in the next chapter. 


One of the computer languages is BASIC. This book is 
about the BASIC language. This book discusses with examples 
the rules of the BASIC language. We will attempt to cover as 
many versions of BASIC as possible but with specific empha¬ 
sis* large computers which are also adaptable to personal 
9 However keep in mind that there are minor dif- 
ferences S among the different versions of the BASIC among 
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large computers as well as personal computers. Consequently, 
it is not possible to cover every possible variation. 
Therefore, you are encouraged to consult your system s BASIC 
Reference Manual for any unique features your system may or 
may not have. 
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QUESTIONS 


1. Define CPU. 

2. What is the difference between secondary storage and 
primary storage? 

3. Is a hard disk considered primary storage or secondary 
storage? Discuss. 

4. What is the difference between ROM and RAM? 

5. What are the components of CPU? 

6. Discuss the two major components of a computer system. 

7. Discuss the differences among micro, mini, and main¬ 
frame computers. 

8. Discuss why we need software. 
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BASIC AND THE BASIC SYNTAX 


INTRODUCTION 

Professors John G. Kemeny and Thomas E. Kurtz of 
Dartmouth College developed BASIC in the mid-1960s. BASIC 
is an acronym for Beginner's All-purpose symbolic Instruc¬ 
tion Code. It was designed to allow interacting computing 
for on-line computer systems. Interactive computing allows 
programmers or users to interact with the program while it 
is being executed. That is, it can accept input from the 
user and can respond to the user. Further, a program written 
in BASIC is entered into the computer through either a 
keyboard in case of a new program or a diskette if an 
existing program. The compilation occurs when the programmer 
types the program and issues the command RUN to execute the 
program. It is easy to learn and can be used for a wide 
variety of useful business and personal applications. It has 
become one of the most popular programming languages. 
Today, BASIC is available on all types and sizes of comput¬ 
ers . 


Like any other language, BASIC has rules for spelling, 
syntax, grammar, and punctuation. The rules of a language 
help us learn a language and help us communicate with one 
another; so do the rules of BASIC. The rules of BASIC help 
us to tell the computer what we want it to do. It is inter¬ 
esting to note that the English language and BASIC have many 
words in common — words like LET, GOTO, FOR/NEXT, INPUT, 
PRINT, and END link. Thus, many abstract algebraic expres¬ 
sions can be conveyed by easy-to-understand English words. 
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The main purpose of BASIC is to allow interactive use 
of the computer: one or more BASIC users could communicate 
with the large computer during the processing and feel as 
though they had the computer all to themselves. As the 
demand for microcomputers and minicomputers increased, 
manufacturers of such computers felt a need for simple but 
effective languages for them. Rather than create entirely 
new languages, most decided to offer BASIC because of its 
interactive capability — the ability of a user to communi¬ 
cate directly with the computer in a conversational fashion. 
However, many altered the original BASIC to suit their 
equipment. Although BASIC has a universally accepted set of 
standard rules called ANSI BASIC, each manufacturer added 
its own "quirks" to this standard as part of the special 
features of its machines. 


RULES Of BASIC 

This section defines some of the terminology frequent¬ 
ly used by people programming in BASIC (and by computer 
programmers in general). A knowledge of these terms is 
important for a thorough understanding of this text. 


Constants — Numeric and String 

Constants are values that do not change during 
the execution of a program. BASIC has two types of constants 
— numeric constants and string constants. The following 
diagram illustrates the types of constants available in the 
BASIC programming language: 
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FIGURE 2.1 : Types of Constants 



As depicted by the diagram above, the two major cate¬ 
gories of constants are numbers and character strings. 


Numeric 

BASIC permits numbers in two ways: as real or integer . 
A numeric constant is any numerical value that is assigned 
to a numeric variable or is written as a part of an arith¬ 
metic expression. Numeric constants represent ordinary 
numbers can be written as decimals (called real numbers) or 
integers (whole numbers). Real numbers can be expressed in 
either exponential notation or decimal fractions. Any posi¬ 
tive or negative whole number without a decimal is called an 
integer constant. For example, 65321 or 6543 or -46699 are 
examples of integer constants. Any positive or negative real 
number with a decimal is called a real (fixed point) con¬ 
stant. For example, -62.09 or 6365.29 or -0.35678 or 
0.35678 are examples of real constants. The rules for creat¬ 
ing integer constant or decimal constant numbers in BASIC 
are: 

1. A number cannot have embedded commas: 

96765 (valid) 96,765 (invalid) 

6878.50 (valid) 6,878.50 (invalid) 
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2. All negative numbers must be preceded by a minus sign: 

-653 (valid) 653- (invalid) 

-67676.60 (valid) 67676.60- (invalid) 

3. A number without a sign is assumed to be positive: 

6753 is the same as + 6753 
6753.50 is the same as + 6753.50 


The largest number that BASIC accepts is about 1.7 x 
10*38. Any acceptable number can be entered into the comput¬ 
er in either standard or scientific (exponential) notation. 
The form in which BASIC displays a number depends on many 
factors, with size being an important consideration. When 
very large or very small numbers are involved, an exponen¬ 
tial (E) notation can be used. The decimal notation is based 
on a systematic use of exponents (E). Any positive or 
negative real number with an E within a number is called an 
exponential (floating point) constant. Scientific notation 
is commonly used to represent large numbers. Scientific 
notation is based on using powers of 10 to stand for zeros. 
In BASIC, numbers are written in the form Y x 10*i where Y 
is a number from 1 up to 10, and i is an integer. Y x 10 * i 
is usually written as YEi. The YEi is read as "Y times 10 
to the power of i". For example, it is much more convenient 
to write the United States Federal Government budget 
1,000,000,000,000 as 1 x 10*12 dollars, 1. E 12. It is 
easier to write the number 0.00000093 in E form 93 x 10*-8, 
or 93E-8. When a number is written in an exponential nota¬ 
tion where the value to the left of the E is called the 
mantissa (significand) and the value to the right of the E 
is called the exponent. The computer displays i as a two- 
digit number, preceded by a plus sign if i is positive and a 
minus sign if i is negative. That is, 


93. E -8 

mantissa exponent 
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The exponent indicates the number of places the decimal 
should be moved to the right if the sign is positive, and to 
the left if the sign is negative. Note that 


48780 = 4.878 X 10‘ 4 = 4.878E+4 or 4.878E4 or 4.878E04 

and 

.007868 = 7.868 x 10 ‘ -3 = 7.868E-3 or 7.868E-03 


In the above examples, the decimal in the first number 
was moved four places to the right from its location, and in 
the second number the decimal is moved three places to the 
left of its location. Other examples of exponential nota¬ 
tions are in given in Table 2.1. 


TABLE 2.1 

Examples of E-Type Constants 


Decimal Number 

Scientific Notation 

Exponentiation Notation 

653265.77 

4 

653.26566 x 10 

-5 

65.326566E+4 

.00035 

35. x 10 

-4 

35.E-5 

.00035 

3.5 x 10 

3.5E-4 

-632.66 

2 

-6.3266 x 10 

-6.3266E+2 
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To use an exponential constant, the following rules 
must be observed: 

1. A number, called significand (mantissa), must precede 

the E. Any valid integer or decimal constant is 
considered an acceptable significand. 

2. 'the exponent (number that follows the E) must be an 

integer constant with a positive or negative sign. If 
a sign is absent, a positive sign is assumed. If the 
exponent is too large for the computer, a diagnostic 
(error message) is issued. Some computer will accept a 
number up to 36 digits long, if a real number; and up 
to 18 digits it an integer. However, keep in mind that 
the number of digits in mantissa (significand digits) 
cannot exceed 16 digits for a real number and 8 digits 
for an integer number. Therefore, the following 
numbers will result in error. 


Examples: 

-4.567E38 or -4.567E+38 
778E+20 or 778E20 
9999995689E10 
4.91872634E-38 


In the above examples, all the numbers are larger that 
the permissible size. 


String 

A collection of alphabet, digits, or special charac¬ 
ters enclosed within quotation marks is called a string 
constant. Unquoted strings are permitted only in the DATA 
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statements or as inputted data. A charac er . . 

sequence of letters of the alphabet, numbers, 
characters enclosed in quotation marks. N ° te ,, reore- 

qer constant 1988 and the character constant P 

sent two different values. A numeric constan 8 ® 
used in arithmetic expressions; however, , v 

string value of the digits 1,9,8 and 8. The quo 
indicate the beginning and the end of the string * 

The string constant "1988" cannot be used in arith 
expressions. String constant can be used to repres . 

name of a person, thing, or place. A string c ° ns . 
used for report heading and printing messages. To 
string constant, these rules must be observed; 


1. A string enclosed in quotes consists of all 
characters between quotes, including blanks. For 
example: 


"ABC " , " XYZ " , " Dollar Sign ($)" 


2. A null (blank) is represented by a pair of quotes. 
For example: 


tl H 


3. Any character can be used in quoted strings. For 
example: 

"#:$*" , "$90" , " HELLO, How are you?" 


4. The character quote(") within a quote must be 
enclosed by two quotes. For example, a string 
constant: 

"Quote ""quote"" within a quote" 
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Some examples of numeric and string constants are 


Constant 


Type 


1. 87 

2. -164.6 

3. "What is your name?" 

4. "1988" 

5. 4.878E+4 

6. 7.868E-3 


Numeric (integer) 
Numeric (decimal) 
Character 
Character 

Numeric (exponential) 
Numeric (exponential) 


Variables 

A programmer can name a storage location in the CPU 

f °^i S ^° ring a - value in The storage location's name is 

called a variable name. In terms of computer memory, the 
variable in a program represents a specific location in 
the computer's memory. That is, a variable represents a 
place where data is stored. The value in the variable can be 
changed during the execution of the program; thus, the name 
variable. Values are assigned to variables by using BASIC 
statements in a computer program. In BASIC, the variable is 
named by combining characters, the first character must be 
an alphabet, however. 

BASIC provides all of the functional capabilities of 
high-level programming languages; it has alphabet or char¬ 
acter set, reserved words, and grammar. 

The character set of the BASIC language constitutes 
the set of individual symbols that are recognizable by the 
language interpreter. The character set for BASIC varies 
among the systems. However, the most common character set 
consists of three subsets. 

1. Alphabetic characters ABCDEFGHIJKLMNO 

PQRSTUVWXYZ 

2. Digits 0123456789 

3. Special symbols ! @ # $ % ‘ & *()+_“{)[] 

b (blank) < >. 
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Certain words (such as LET, PRINT, and READ) in BASIC, 
called reserve words, have a special meaning to the BASIC 
interpreter (compiler), and thus cannot be used as variable 
names. Each BASIC user's manual contains a list of the 
reserve words for its system. Reserve words are formed with 
the character set. Reserve words are language commands that 
must not be used by a programmer to create variable names. 

The programmer is responsible for naming the variables 
used in a program. A variable is a value that is referred to 
by a name in a program. Each programming language has its 
own rules for naming variables. The variable name in many 
large mainframe BASIC language must not exceed two charac¬ 
ters in length and must consist of alphabet and digit or a 
dollar sign ($). On the other hand, in many PCs' versions of 
BASIC, variable names can be up to 40 characters in length, 
but only the first one to seven (in the case of the micro¬ 
computer, Microsoft recognizes 40 characters) characters are 
used by the computer. For example, Applesoft BASIC permits 
user-defined variable names to contain as many as 238 char¬ 
acters; however, only the first two are significant. In a 
similar manner, only the first two characters of a variable 
name are meaningful in the TRS-80 Model III BASIC. On the 
other hand, TRS-80 Model 4 BASIC permits names with eight 
significant characters. Therefore, although the variable 
names MASS1 and MASS2 look significantly different to a 
programmer, they are considered to be the same variable, MA, 
by the computer. The first character of all the variable 
names must be an alphabet character. 

In IBM PC BASIC, variable names can be up to forty 
characters long, must begin with a letter, and may consist 
of letters, digits, and periods. The computer does not 
distinguish between upper and lower case letters used in 
variable name, and treats them all as uppercase. Although 
the letters may be typed in either case, the computer always 
displays variable names in uppercase letters in program 
listings. Some examples of variable names are TOTAL, 
TAX. RATE. 1987, and N. The value assigned to a variable can 
be changed during the execution of a program. If possible, 
the variable names should be as descriptive as possible. 
That is, instead of naming the amount of loan - principal as 
P, it is better to use the variable name PRINCIPAL. 
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1 f n 9 ua ge uses two data types - numeric and 
string. The data type could be either a numeric variable or 

l Each type of variable can hold its own 

type of data, in many pc versions of BASIC , the data type 

of a variable can be identified by the tag that is appended 
to its name. 


Numeric Variable 

A numeric variable consists of a letter or a letter 
followed by a digit. For example, 

S, PI, S3, R9, or D 

are all examples of valid numeric variables. That is, all of 
these names start with a letter and a digit as a second 
character. However, some systems differentiate between an 
integer and real variables. In some systems, the integer 
variables are tagged as % and can be assigned values between 
-32,768 to +32,767. Integer variables can also be assigned 
values without a decimal or fractions. When decimal values 
are assigned to integer variables, the part of the number 
following the decimal point is ignored. The real (a number 
with a decimal) data type is the default or assumed data 
type for the BASIC language. Any numeric variable that is 
not tagged as an integer will automatically be designated as 
a real variable. However, for a large system, the following 
rules apply to numeric variables: 


1 . 
2 . 

3 . 

4 . 


Numeric variables represent only numeric data 
Numeric variables are preset to zero prior to the 
program execution 

The absolute value of a numeric 
in the range of 3.1352 times 10 
10 322 

Values smaller than the minimum are set to zero, and 
values larger than the minimum result in an error. 


variable must be 
to 1.26501 times 
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Numbers can be stored in a single-precision or 
double-precision variable. The difference between single¬ 
precision and double-precision is the number of significant 
digits that can be represented. Single-precision variables 
can be assigned values with up to seven significant digits, 
while double-precision variables can be assigned values with 
up to seventeen significant digits. The difference between 
the two types of variables is in the precision. A double¬ 
precision variable can store a value with 16 or 17 signifi¬ 
cant digits of precision, depending on the computer system 
being used. In Microsoft, the double-precision variable is 
tagged with the pound symbol (#). Some BASICS cannot use 
double-precision. Many non-scientific applications use the 
integer and single-precision data types. 


String Variables 

String variables represent alphanumeric text and are 
named with a 2- or 3- character identifier. String variable 
names are formed by adding the $ (dollar sign) tag to a 
variable name. The first character must be an alphabet. For 
example, 


A$, C$, N$, or Y$ 
are examples of string variables. 

Values that can be assigned to string variables are 
termed string values or simply strings. A string is any 
combination of the BASIC character set. For example, "sen¬ 
tence" is a string, and "99999999" is also a string. The 
latter example appears to be a number, but it is considered 
a string by the computer. 

A string can be created from any combination of ele¬ 
ments of the BASIC character set; therefore, some numbers 
could be read as string. However, the context within which 
these "numbers" are used makes them strings. In some cases, 
it may be desirable to read a number as a character string, 
e.g. a social security number (SSN) or an ID number. This 
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type of number is not likely to be used in arithmetic opera¬ 
tions, and, therefore, it does not make sense to treat it as 
a number. It is important to remember that strings cannot be 
assigned to numeric variables and string values cannot be 
used in arithmetic operations. 


Some examples of valid variables are: 

Type of System Variable Type 

Mainframe: 


Y1 

integer/real 

Y 

integer/real 

A1 

integer/real 

A 

integer/real 

B$ 

string 

SUM% 

integer 

TOTAL 

real 

NAMES 

string 

A 

real 

A % 

intege 

A$ 

string 


Some examples of invalid variables are: 

Type of System Variable Reasons for error 


Mainframe: 

1Y First character is a digit 

Y? Second character (?) is a special character 

A- Second character (-) is a special character 

$A First character ($) is a special character 


PC 

%SUM First character (%) is a special character 

integer 

1TOTAL First character is a digit 

$NAME First character is a special character 
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STATEMENTS 

In applied problems, quantities are referred to by 
names. In general, a variable is a name that is used to 
refer to data. LET statements are used to assign values to 
variables or write mathematical expressions and PRINT state¬ 
ments are used to display the values of variables. Each 
basic statement is preceded by a number which identifies the 
statement as veil as its sequential relationship to the 
other statements in the program. 


The LET Statement 

In some systems, the assignment of a variable name 
requires the use of the LET statement. The general form of 
the LET statement is 

Tj i LET varaame = constant or arithmetic expression 

The LET statement consists of the line number (LN), 
the word LET, the = (equal sign) and a constant (numeric or 
string) or an arithmetic expression. 

The LET statement assigns a value to a variable or 
another variable to a variable name. For example. 


10 

LET 

vamame 

= "small" 

(a string constant) 

20 

LET 

varaame 

= varaame 

(another variable) 

30 

LET 

varaame 

= 99950 

(a numeric constant) 


Let us assign the numeric constant 568 to the integer 
variable SUM*; that is, the statement 


10 LET SUM* * 568 or 10 LET A1 = 568 
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assigns the value 568 to the variable SUM% or Al. Actually, 
the computer sets aside a location in memory with the name 
SUM% or Al and places the number 568 in it. The statement 


20 PRINT SUM% or 20 PRINT Al 


looks into the SUM% or Al memory location for the value and 
displays it on the screen. 

Variables are commonly used to represent an unknown. 
For example, the number of inches (I) can be represented as 
follows: 


10 LET I = 10 * 12 
or 

10 LET F = 10 
20 LET I = 12 X F 


That is, every time the number of feet (F) increases 
by 1, the number of inches increases by 12. Since the number 
of feet (F) and the resulting number of inches (I) can vary, 
F and I are called variables. 

Consider the following relationship which can be used 
to compute the weekly or monthly pay for a person employed 
at an hourly rate: 


10 LET A = R1 * HI 


All the variables are unknown to the computer. There¬ 
fore, values must be assigned to the variables R1 and HI 
before this statement is executed. For example, a complete 
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program could 

look like 

as follows: 


10 LET 

R1 

* 10 


2 0 LET 

HI 

= 20 


3 0 LET 

A 

= HI * 

R1 


40 PRINT R1, HI, A 


As the value of either R1 or HI varies, so does the 
weekly pay represented by the variable A (AMOUNT). 


ASSIGNMENT RULE 

I 

Every variable in the LET statement to the right of the 
equal sign should have appeared in the program previously 
so that its value is determined. 


Consider a savings plan where interest is compounded 
annually. In this situation, starting with a principal of P 
dollars earning i percent interest per year, the resulting 
amount (A) after n years can be written as follows: 


10 LET A = P * (1+i) *n or 10 LET A = P * (1+i) ** n 


A different value of the variable P, i or n will result in a 
different total amount of dollars represented by the varia¬ 
ble A. 
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Expression 


ome s atements of BASIC are called expressions. An 
expression is formed by combining operands and operations; 
however, an expression could be formed with just constants 
or variables. Expressions can be arithmetic or logical. An 
arithmetic expression consists of a sequence of variables, 
constants and arithmetic operators that is to be evaluated 
to calculate a number. Expressions are evaluated by replac¬ 
ing each variable with its value and carrying out the arith¬ 
metic operations. Arithmetic and logical expressions are 
used frequently to solve problems. 


Arithmetic Expression 

Arithmetic operators are used to indicate operations 
like addition, subtraction, multiplication, division, and 
exponentiation: 


TABLE 2.2 


Arithmetic Operators 


Operation 

Priority 
of Operations 

Mathematical 

symbol 

BASIC 

Symbol 

BASIC 

Example 

Addition 

4 

+ 

+ 

C+Y+9 

Subtraction 

4 

— 

— 

D-9-4 

Multiplication 3 

X 

* 

Q*T*E 

Division 

3 

— 

/ 

Q/5 

1 

Exponentiation 2 

D 

C 

** or * 

C“D or 

Parentheses 

1 

( ) 

( ) 

(A+B)*C 


In the case of exponentiation, the symbols or "**" 
could be used. The user's manual will identify the accept¬ 
able symbol. However, some versions of BASIC use both "**" 
and for exponentiation. 
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The following rules describe the order in which the 
operations in an arithmetic expression are evaluated: 


Precedence Rule 1: If there are no parentheses in the 
numeric expression, first all exponentiations are 
evaluated, then all multiplications and/or divisions, 
and finally all additions and/or subtractions. However, 
in case two of the same priority operators are present 
in the equation, the one on the left is evaluated first. 
That is, in case the division and multiplication symbols 
are present, the one on the left will be evaluated 
first. The same is true of the plus and minus. 

This order of operations is sometimes called the rules 
of precedence or the hierarchy of operations. The meaning of 
these rules can be made clear with some examples. 


For example, the expression 

20/5*3/3"3+6*5-6 (2.1) 


is evaluated as follows: 


20/5*3/9+6*5-6 

operation 

4 * 3/9+6*5-6 

operation 

12/9+6*5-6 

operation 

1.333 + 6* 5-6 

operation 

1.333 + 30-6 

operation 

31.333 - 6 

operation 

- 25.333 

operation 


(3 to the power of 3) 
(20 divided by 5) 

(4 multiplied by 3) 
(12 divided by 9) 

(5 multiplied 6) 

( 1.333 plus 30) 

( 31.333 minus 6) 
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Parentheses are used to change the order of opera¬ 
tions. The following rules describe the order in which the 
operations in an expression containing parentheses are 
evaluated: 

precedence Rule 2: If there are parentheses in an 
expression, all parts of the expression within the 
parentheses are evaluated first according to the Precedence 
Rule 1. Then the remaining expression is evaluated 
according to Precedence Rule 1. 

Using the first example (2.1) with parentheses, the 
expression: 

20/5*(3/3)~3+6*5-6 (2.2) 


is evaluated as follows: 


20/5*l“3+6*5-6 

operation 

1 

(3 divided by 3) 

20/5*1+6*5-6 

operation 

2 

(1 to the power of 3) 

4*1 +6*5-6 

operation 

4 

(20 divided by 5) 

4 +6*5-6 

operation 

5 

v (4 multiplied by 1) 

4 + 30-6 

operation 

6 

(6 multiplied by 5) 

34-6 

operation 

7 

(4 plus 30) 

28 

operation 

8 

(34 minus 6) 


Calculating interest on a loan is an example of an arith- 
metic express ion. Sone other examples of arithmetic expres- 

sions are: 


B = 22 * RATE + 7 

C = M + 1 
D = (C + D) /3 
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If D In a variable, then t he statement 


LET D - A + H 


first evaluates the expression on t.hn right and then assigns 
its value to D. Ilncnuio thn expression on the* right of the 
equal nlgn In n LET statement in evaluated before an assign¬ 
ment in made, a statement such as 


LET AMOUNT - RATE * PRINCIPAL 


is meaningful. It first evaluates the expression on the 
right and then assigns the value to the variable AMOUNT. The 
effect in to calculate the value of the variable AMOUNT by 
multiplying RATE by PRINCIPAL. In terms of memory locations, 
the statement roads "the values of RATE and PRINCIPAL" from 
the RATE'S and PRINCIPAL'S memory locations respectively, 
uses them to calculate the AMOUNT, and then places the 
number in the AMOUNT'S memory location. Other examples are: 


10 

20 

30 

40 

50 

60 

70 

80 


must be observed: 

1. Only numeric operands (constant or variable) and 
numeric operators should be used. 


LET Y - 10 
LET XI - 5 

LET A1 - 10 
LET A - Y+333 
LET B - Xl+Y-556 
LET C - Al*B/3222 
LET D - 5 .6*C* Y 
PRINT A,B,C,D 



To use an arithmetic expression, the following rules 
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2. Two arithmetic operators cannot appear side by side: 


Algebraic Valid 

Expression BASIC Expression 


Invalid 

BASIC Expression 


x * - Y X * (-Y) 

X / " V X / (-Y) 


X * -Y 
X / -Y 


3. Operators cannot be implied: 

Y/X(A*B) (invalid) Y/X * (A*B) (valid) 


Logical Expression 


A logical expression is a sequence of variables and 
constants, connected by relational operators. Logical ex¬ 
pressions always have a value of true or false, test the 
condition, and indicate whether to take alternative courses 
of action based on the results of the tests. For example: 

C > D 

A + B <= 0 

A < D AND D > F 


If the above conditions are written in a logical 
statement, it will be checked to find out whether a condi¬ 
tion is true or false. The comparison can also be made 
between two numerical values or two string values. In a 
logical expression, any two constants or variables are 
related by using relational operators. 

There are two types of logical expressions: simple and 
compound. Simple expression are formed by connecting two 
numeric or string expressions with a relational operator. 
Compound relational expressions are formed by connecting two 
simple relational expressions with a logical operator. 
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Relational Operators 

A number of rational operators are used by BASIC for 
logical expressions. Logical expressions, such as A>B, have 
a value of either true or false and can be used to establish 
the condition under which the task is to be performed in a 
program. For example, using the logical expression A>B, one 
can cause a branch to a specific set of statements in a 
program whenever this expression is true, i.e. whenever the 
value of A is greater than the value of B. The relational 
operators are: 


TABLE 2.3 

Relational Operators 


Mathematical BASIC 


Relations 


Symbol 

Symbol 

Examples 

Equal to 


= 

= 

Y = X 

Less than 


< 

< 

A > 50 

Greater than 


> 

> 

XI > 9 

Less than or 

equal to 


<= 

Y2 <= 20 

Greater than 

or equal 


>= 

Y4 >= 50 

Not equal to 


= 

<> 

A <> B 


A condition test is coded within an IF statement. The 
IF statement will be discussed under IF ... THEN statements. 
The condition in an IF statement could consist of compound 
conditions. That is, conditions that are separated by OR, 
NOT, and/or AND are called compound statements. For example, 


A>B and C>B; it will perform the condition if both 
t values of the variables A and C are 

greater than B. However, if A is less 
than B, then the condition C greater than 
B will not be checked, and the statement 
will not be executed. 
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A>B or OB? it will perform the condition if either A 

is greater than B or C is greater than 
B 

A>B or OB and D=E; it will check the first two conditions, 

and if one of them is true, it will only 
then check the D=E condition, othervise, 
the last condition will not be checked 

NOT (A>B); this statement is true only if the 

statement A>B is true. In other words, A 
is less than B. 
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QUESTIONS 

1. Define a string and a numeric constant. 

2. Define an integer and a floating point constant. 

3. Define a variable. Discuss with examples string and 
numeric variables. 

4. Classify the following numbers as either an integer or 
a floating point. 

45000 650.40 560.00 6000 6600 .689 450 88 8.8 


5. Find errors, if any, in the following data, and correct 
them if not valid constants. 

45,000 450*40 450 45.00 450/50 

6. Which of the following are valid integer numbers. 
Correct those which are not valid integers. 

45.00- 45.00 +4506 56,000 .60 -60 60.90 

7. Which of the following are valid floating point num¬ 
bers, correct those which are not valid floating num¬ 
bers. 

45.00 450.00- 4506 +45.00 .60 60 60.90 


8. List the symbols and the character sets used in BASIC. 


9. Find errors, if any, in the following variable names. 
Correct them and explain the reasons for the errors. 

SI S-2 #S1 2S S2# S$ Sl$ 
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10. Which of the following are valid 
Correct those which are invalid. 

"KARACHI* 1 TEST "456" "456,78" 

"517-773-000" LAHORE,PAKISTAN 


11. Which of the following are valid 
Correct them, if wrong. 

a) 10 LET A = 10 

b) 10 LET 10 = A 

c) 10 LET A = 10 = 20 

d) 10 LET A = "KARACHI" 

e) 10 LET A = KARACHI 

f) 10 LET A$ = "KARACHI" 

g) 10 LET KARACHI = A 

h) 10 LET A = B/10 + T*10 (assume that B and T are defined) 

i) 10 LET B/10 + T*10 = A 

j) 10 LET A = 3 + A$ /34 
1) 10 LET A$ = 3 + 45 /5 

12. Which of the following are valid expressions? 


A = 45 / 4 * 10 + 14 

B = A / 10.10 - 45/10 

C = -A / 10.10 + 45 
D = A / -10.10 + 50 
C = 56 * 10 / 56 + 14 
C - (56 * 10 / 56 + 14 ) ) 

13. Calculate the answers to the following statements. 

A = 45 / 50 + 450 /10 - 60 * 3 + 3 ** 2 

A = (45 / 50 ) + 450 /10 - (60 * 3) + 3 ** 2 

A = (45 / 50 ) + (450 /10) - (60 * 3) + 3 ** 2 

A = ((45 / 50 ) + (450 /10) - (60 * 3)) + 3 ** 2 


string constants? 
"PAKISTAN" 456 

BASIC statements? 
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14. Write the exponential equivalents of the following numbers. 

a) 459.34 

b) - 45.456 
C) 2345.56 

d) 0.000456 

e) 40560. 

15. Write the decimal equivalents of the following numbers. 

a) 6.788E+04 

b) .6788E+05 
C) 6.788E-04 

d) 5.629E-01 

e) 5.68 E402 

16. Which of these numbers are invalid exponentials. 

a) 6.78E04 

b) 6.56E 

c) .56-02 

d) 6780. 

e) 567.56E- 

17. Define a logical expression. 

18. Define relational operators. 

19. Write the following algebraic expressions as computer express 

a) Y 2 4 XY 4 2/99 

b) X 2 Y 2 4 ( Y 4 X ) 2 / X 

C ) (6 - X / 9 4 Y ) 2 / (A 4 B) (CD) 

20. Assume that the value of X is 3, C is 5, and Y is 4. Evaluate 
the following expressions. 

a) Y 4 X - C 

b) X/Y 4 Y ** 2 4 C 

c) (X/Y 4 Y) ** 2 4 C, 

d) X 4 Y - C 

e) X/Y 4 Y/X 4 C 

f) X/Y 4 (Y/X 4 C) 


42 


Scanned by CamScanner 



CHAPTER 3 


COMPUTER PROGRAMMING PROCEDURES 


COMPUTER PROGRAMS 


Computer programs (software) are step-by-step instruc¬ 
tions for solving a problem. The computer must be able to 
read and interpret each of these instructions. Writing a 
program requires the following standard procedure called 
"the programming process". That is, one must: 


1. Define the problem — 

2. Design the program — 

3. Code the program — 

4. Type the program — 


understand what one is trying 
to solve. 

write a step-by-step procedure 
(called algorithm) for solving the 
problem. 

write the program using the 
language of one's choice, e.g. 
BASIC. 

enter the program into the computer. 


5. Execute and Debug 

the program — run the program and correct syntax 

error, if any. 

6. Revise and execute 

the program — fix all the errors and run the 

program with test data until an 
acceptable output is produced. 


Let us take a problem for the purpose of showing the pro¬ 
gramming process. For example, one wants to borrow $10,000 
to be paid in equal installments over the life of the loan 
for 15 years at 10% interest rate. The question is: how much 
is the interest per year, and how much will be the total 
interest during the life of the loan? 


43 


Scanned by CamScanner 


Chapter 3 


Define the Problem 

Th« first step is to define the problem. 
could be analyzed by using^ / p^esililg Before deter- 

X. Determine the desired *«»/* .^rTTSur 

does one want the amount of the in ^ rly balance, the 

year? Does one want a table sho g V amount of inter¬ 
amount of interest each V Gar ' t -j us t a column showing 

cst after each year? Or does one want }ust 

the amount of interest for each year. 

2. Determine h °“ C , h ** “ % pe" Tnu^ers’"or strings') 

o h f at data" wha S t TeThe Urc'e of da^a ,'terminal tape, or 
Sisk) ‘ is there a need for error checking on the data? 


Design the Program 


AMOUNT - PRINCIPAL X INTEREST RATE 


(3.1) 


is the algorithm to calculate the interest amount, 
we know how to solve the problem. Of course, the 
Theref ' t be t old how to solve a problem. Therefore, 
computer has to b so lve a problem, the computer 

if one does not know rt n h ° en , ore , if one has to calculate the 

total"a»ount h of' interest paid at the end of each year, the 
algorithm as is follow: 


SUM - SUM + AMOUNT 


(3.2) 
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This means that the variable SUM is 
of interest (AMOUNT) paid each year. 


accumulating the amount 


Code the Program 


The third step —■ writing and documenting the program 
— should be relatively easy. Programs are written by 
translating an algorithm into a series of language state¬ 
ments. The programming languages are similar to sentences 
wr i tten English, a natural languages. Many BASIC words 
such as READ and PRINT are easy to interpret. The language 
has precise grammatical rules. Further, the programmers must 
develop an effective and efficient writing style like the 
one required for English. 

Grammar is generally referred to as syntax in a programming 
language. 

A BASIC program consists of a series of statements 
that tells the computer what to do. Each statement consists 
of a programming command with numeric or character string 
constants or numeric or string variables, or formulas called 
expressions. 

The command code of the BASIC instruction determines 
the function. The command determines the processing task to 
be performed by the statement. For example, if the BASIC 
command LET was a part of a statement, a variable memory 
will be created and a value will be stored in the memory. 
Similarly, the PRINT command starts an output operation. 
Essentially, all statements must contain commands or an 
expression. Otherwise, the statement will have no purpose. 

All statements with command must have a variable or a 
constant to be worked on. For example: 


READ N 
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The statement defines the variable N to be processed. This 
statement specifies the operation of READ and specifies to 
read the variable N. 

Statements written in a BASIC program follow the 
general line format consisting of three elements: (1) line 
number, (2) command, and (3) variable(s). Each component in 
this format serves a different function. For example, a 
program for the equations (3.1) and (3.2) in BASIC would 
look as follows: 



PROGRAM 3.1 

10 

LET P= 10000 

20 

LET I=.15 

30 

LET S= 0 

40 

LET A = P * I 

50 

LET S = S + A 


<j>jie line numbers in a BASIC statement identify the 
statement and define the order in which the instructions are 
executed. The line number starts each instruction and as¬ 
sumes a numeric, integer format. The range of acceptable 
line numbers is generally between 1 and 99999. The upper 
limit depends upon the systems for which the BASIC program 
is written. Generally, the line number 99999 could be the 
last statement number possible, though it is very rarely 
used Typically, spacing between lines is suggested when 
numbering lines so that additional programming statements 
can be inserted, if necessary. Line numbering such as 11, 
12 13 14, 15, does not allow for changes or additions to 

the program. Therefore, line numbering such as 10, 20, 30, 
40 50, is advisable. These numbers allow for additions 

between existing lines, if desired. For example, a line 
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number 32 can be inserted between the above lines 30 and 40. 
None of the existing statements has to be renumbered. The 
operational software supporting BASIC will accept this newly 
inputted statement and logically position it between lines 
30 and 40. Thus, the new order of statements becomes, for 
example, lines 10, 20, 30, 32, 40, and 50. 

No two statements could have the same line number. 
Some versions of BASIC allow several statements to be placed 
on a single line separated by colons. That is, more than one 
statement can be placed on a single line of a program pro¬ 
vided that the statements are separated by colons. For 
example, to rewrite Program 3.1 in a multiple form, 


PROGRAM 3.2 


10 

LET 

P= 10000 

20 

LET 

1=. 15 

30 

LET 

S— 0 

40 

LET 

A = P * I : Let S = 


This practice, however, it is not advisable because it 
increases the difficulty of writing, reading, documenting 
debugging, and revising programs. Therefore, the general 
rule of just one statement per line is recommended. This 
rule also makes editing easier. 

The line numbering method gives BASIC a true advan- 
. „ * t , 1-0 free to enter BASIC instructions in any 

order and BASIC will properly reorder then prior to their 
execution This facility makes corrections of a program 
easier thus simplifying the debugging process. 

h , /" b ea °laced"after* each" Une^num^r. °A 
defines the task to be performed. An expression is used by a 
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reserved word in the process of manipulating data cr making 
decisions. Expressions include values tc be assigned tc 
variables. 

The place of the statements within a program deter- 
■ines how the prograa is executed. However, it is advisable 
to follow a standard structure in the development o. a-- 
programs. The organization of a program, is referred as 
programing style. 


Programming Style 

One of the preferred programming styles is to create a 
program that includes a section called documentation. That 
is. this section should identify the purpose of the program, 
author, date written, date revised, variable names, and 
variable usage information. The REM (remark) statement is 
used to document a prograa. The REM statement has no effect 
on the program. The remark statement contains comment or 
explanation intended for humans. For example, 


1 REM PROGRAMMER JOHN DOE 

2 REM This program calculates interest on a loan 

5 REM VARIABLES 

6 REM A = AMOUNT P = PRINCIPAL 1= INTEREST 

7 REM S = SUM 

Following this section, the declarative statements, if 
any should appear. Declarative statements define arrays, 
data sets, and data types (Examples of these will be dis¬ 
cussed later in the book). The third section should consist 
of the program body or data manipulation portion of a pro- 
aram. The body of the program contains a section on input, 
process, and output. In addition, liberal documentation of 
statements within the program is highly recommended. The 
apostrophe (') or an exclamation (!) could be used for 
documentation within the executable statement. Executable 
statements are statements which the computer checks and 
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processes. For example, to rewrite statement 40 in (3.1), 


10 LET A ■ P * I 'This statement calculates interest 

In this example, the statement before the apostrophe (') 
will be executed, and the message after the apostrophe will 
be ignored. Documentation is always helpful to a reader of 
the program. It provides a record of the intent of the 
various programming sections. Good documentation can help 
avoid future problems or make them easier to solve when they 
occur. Documentation consists of all written descriptions 
and explanations necessary for later modification or updat¬ 
ing of the program. The last section of a program is program 
termination. That is, the END statement. For example, 

120 END 


Type the Program 


To begin entering a new program, type each line as 
follows and press CR (carriage return), RETURN, or <- key 
after each statement. For example: 


PROGRAM 3.3 


10 

REM 

PROGRAMMER 

20 

REM 

This program 

30 

REM 

VARIABLES 

40 

REM 

A = AMOUNT 

50 

REM 

S = SUM 

60 

LET 

S = o 

70 

LET 

p = 10000 

80 

LET 

I = .15 

90 

LET 

A = P * I 

100 

LET 

S = S + A 

110 

PRINT 

A, P, S 

120 

END 



P = PRINCIPAL 1= INTEREST 


(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 

(CR) 
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However, some BASIC compilers will let the computer 
give line numbers. For example, IBM PC will generate line 
numbers by you typing AUTO command without a line number 
before entering the programming statements. 


Execute and Debug the Program 

The programmer writes these instructions, or process¬ 
ing steps, in a high-level computer language (BASIC), so 
that they are easy for humans to understand. However, the 
computer cannot understand any high-level language. The 
computer requires machine language for executing the in¬ 
structions. Most of the microcomputer systems require an 
interpreter or compiler to translate. The high-level lan¬ 
guages are translated into machine language by an interpret¬ 
er or a compiler — that is, programs which are stored in 
the computer memory, or which have to be stored in the 
computer memory before a higher-level language can be run. 
Most microcomputers use an interpreter for BASIC, while the 
larger systems often use a compiler for translation. This 
is due to the fact that a compiler typically requires much 
more storage space than an interpreter. In addition, a 
compiler creates an object program from the source program 
and then loads the object program into memory. The computer 
then executes the object program. However, an interpreter 
passes one line at a time of machine language to the comput¬ 
er. A 'compiled program (object program) normally executes 
faster than those created with an interpreter. 

For execution and debugging a program interactively, 
most of the systems require the command RUN. Therefore, to 
execute a BASIC program, one types RUN and presses RETURN. 

During the execution of the program, the BASIC compil¬ 
er checks the syntax rules and highlights errors. The method 
for displaying these errors depends upon the hardware being 
used and the processing mode. In most cases, the BASIC 
program errors will be flagged as they occur, because most 
BASIC programs are run in a time-sharing, interactive mode. 
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Revise and Execute the Program 

If there are syntax errors in the program, the comput¬ 
er will indicate the line number where the errors occurred 
or will stop at the line of error occurrence. In either 
case, one reads the statement and fixes the error either by 
retyping a new statement or editing the old line. After 
fixing errors, one types RUN again to execute the program. 
However, after fixing syntax errors, the program may not 
run; or, if it runs, it may not produce correct results. 
This may be the result of logical errors caused by incorrect 
initialization of a variable, a misplaced GOTO statement, or 
other out of sequence statements in the program. Therefore, 
it is very important that one carefully think through the 
programming logic at the time of writing the program. The 
detection of logical errors can be learned through experi¬ 
ence, however. 

In order to scan the whole or partial program that is 
currently in the computer memory, one just types 


LIST or LIST 10-100 


The command LIST will list the whole program; while 
the command LIST 10-100 will list line numbers 10 to 100. 
However, some systems may require a different format for 
listing a partial program. Therefore, one should check the 
system's manual for a proper rule. 


Saving the Program 

If the program is to be used in the future, one types 
the command SAVE followed by a name for the program. One 
should check the system's manual for the proper rule. Usual¬ 
ly the program name can be up to six to eight characters and 
must start with an alphabet character. For example, to save 
Program 3.1, one types 

SAVE "interest" 
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After properly saving the program, one can. retrieve it 
either by the command LOAD (for a personal computer),GET, 
or OLD. You should check your system's manual for an appro 

priate command. 
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QUESTIONS 

1 . List the steps needed to write a program for a problem. 

2 know^our* ab^Yu- t0 +- bUy 3 Car ° n credit * In order to 
, v U iJ y to P®y back the loan , it will be 

vou hLp f knOW t i e monthl y interest and the principal 
l ou nePd In h 3Y f ° r ea ? h interest rate and the amount 
follow fo*- °rrow. Dlscuss the procedure you would 
follow for writing a program for the problem/ 

3 * fo^- ^ m P ortant to follow the programming procedure 

for writing programs? 

4 * J 3 *— possible to write a pfooram without properly 
defining the problem? 


5. What is documentation and why should we include docu¬ 
mentation in a program? Discuss. 

6. Differentiate between executable and non-executable 
statements. 


7. Write statements (computer commands) for listing the 
following lines in a program. 

t 

a) List line number 100. 

b) List line numbers between 110 and 200, including no 
and 200. 

c) List the whole program. 

d) List line numbers between 100 and 200 and then 230 
and 300. 

8. Write a statement (computer commands) to save a program 
called "Depreciation." 

9. Why do you need line numbers in a prograi written in BASIC 
language? 

*0. What would happen if you were to type a BASIC statement 
without a line number? 
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11. What would happen if you were to type two BASIC state¬ 
ments with the same line number? 

12. Correct errors, if any, in the following program (do 
not change the statements). 

10 LET A = 10 
20 LET B = 20 
20 LET C = A + B 
30 PRINT A, B, C 
23 READ A, B, C 
25 PRINT A, B, C 
14 END . 

13. What is the REMARK statement used for? Discuss by 
giving some examples. 
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DATA INPUT - INPUT and READ/DATA STATEMENTS 


lr. r 1 - 


DATA VALIDITY 




incorrect*results" Besides "the Y program can result in 

common reason might be that the J? 1 ' er . ror '. another Bore 
data to Drnrbcc ^ that the program is given incorrect 

"Garbaae in S ^ ° f error is sometimes referred as 

languaae ca'n 11 t* 9 * ° Ut (GIG0) *" There are some ways BASIC 
SSpf h f Programmed to guard against the problem of 

the p hat ls : the program should verify data at 

wavs BASTr eee h ead ° r ln P utted - Following are some of the 
ways BASIC can be programmed to check for invalid data: 


1. Not enough data: Suppose one value is entered and 

then the <return> is pressed. If the computer is 
expecting two values, it will ask for more or ask 
to "redo from start." While reading data, if not 
enough data is available,"out of data" message is 
printed and the execution of the program will 
terminate. 

■ l j * i 

. s-ri:’ ■ 

II •! •• , . I - 5 4,1 1 • , 

2. More than enough data: Suppose one entered three 

values and the computer expected two values. Most 
computers will ignore the excess data and continue 
the execution without any message, while some 
computers will respond with EXCESS IGNORED or redo 
from start. In the case of the reading of data, it 
will not check beyond what is needed for the read 
statement. 
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3 . 


Incorrect data type: If the computer expected a 
number and an alphabet or aiphanwrie character ( S J 
was entered, the computer will as . . e 
entry. During reading data, the compu e ^ e 
back a message and identify the error and the 
possible line number where the error occurred. 


These are some of the ways the computer checks on 
errors. However, if these conditions do not occur, the 
computer will continue to operate without giving a message. 
There are other cases where errors can occur. In such cases, 
it' is the responsibility of the programmer to provide for a 
validity check of the data. For example, if a variable 
reguires a date, the month must be between 1 and 12 and the 
day between 1 and 31. Therefore, a portion of a program can 
be created to check that the date entered is consistent with 
this rule. In addition to providing for a validity check of 
the data, it is absolutely necessary that programs should be 
designed so that data entry is as convenient as possible. 
This will reduce the amount of mistakes. One of the ways for 
convenient data input is to limit the number of keystrokes a 
person has to make during data entry. 

In BASIC programming there are three methods for 
accepting the data into the computer for processing. One is 
the LET statement, discussed previously; it is used primari¬ 
ly for the assignment of a single or one-time data value. 
The other is the READ/DATA statement combination commonly 
used for processing multiple records with constant values. 
The third method of data entry in BASIC is the INPUT state¬ 
ment. 


INPUT STATEMENT 

One of the most common methods for entering data into 
a BASIC program is through the computer terminal keyboard. 
In this type of data entry, the computer program prompts the 
user to enter data via the computer terminal keyboard. This 
type of data entry, commonly called the interactive data 
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entry, is common in many business data processing applica¬ 
tions. Consider an order entry system. The salesperson asks 
a customer a set of questions and enters the responses into 
the computer through its keyboard. In most cases, questions 
on the computer screen are generated by a program. The 
questions expect certain responses and expect appropriate 
data type entry. The program will then retrieve information 
or calculate additional information based on the logic of 
the program and the information provided. 

Interactive data entry is essential in those cases 
where the values of the data items are unknown until the 
program is actually used. In the order entry system, the 
salesperson does not know the customer's name and address, 
the item(s), and the number of units wanted. As a result, 
the programmer has to create an interactive data entry 
program. Therefore, the INPUT statement is an appropriate 
approach. It accepts the data from the keyboard and causes 
the program to pause and wait until the appropriate type 
and amount of data is entered by the programmer or the 
terminal operator. 

In BASIC language, interactive dialogues between com 
puter and user are easy to program. The INPUT statement is 
used for this purpose. 

The basic form of the input statement is 


Ln INPUT variables separated by commas 


The input statement is preceded by a statement number, 
a blank, and a blank following the keyword INPUT; and it is 
then followed by variable name(s) appropriate to the type of 
information to be inputted. The variable names are separated 

by a comma. 
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‘ -' • ■ • ‘ - • _ , t .. . 

1. The input statement must come before the statement 
where the variable is used in a program and whose 
value to be obtained through an INPUT statement 
from the keyboard 

v* * *4 , C-. » .• c *j v * , 

2. Only commas should be used to separate variables 

3. No comma should be placed at the end of the INPUT 
statement in the program. 

, #* ■' j*! ^ 4 % **'s r 1 '* ' . * * - \ i 


4. While inputting the data, the data must be separated 
by a comma. 



An example of a correct INPUT statement is 


c Id 


, .. . . , , * : •. : , evj - .. » 

by "• f* 2 v i «- -*- 0 *. • . s . 

Variable names are names assigned to computer storage 
locations which hold the data entered through the INPUT 
statement. The computer must know in advance what type of 
data (either alphabetic or numeric) is to be stored, and 
this information is conveyed by the particular form of the 
variable names. 


PROGRAM 4.1 

100 INPUT A$,I,K1 
110 PRINT A$,I,K1 
120 END 

....... ... . . • • • _• • . j 

." ’ • ~J I 1 '' i..;' *.C < 1 '.t 
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K1 In . Pr °S ra » 4.1, the data to 
y ° U know ' A$ is an alpj 
1 l d ^ t Te ™ meric variables. Af 
entered by the programmer and the 
pressed, the values are as 
this statement, more 
INPUT statement. In s 
bles. These commas, 
variables; they have 
tered. 


»e entered are for A$, I, 
abetic data variable, and 
■er the three values are 
<return> or ENTER key is 
signed to the variables. As in 
one variable may appear in the 
on a case, commas must separate varia- 
however, serve only to separate the 
no effect on the way the data v is en- 


In Program 4.1, the execution o 
the computer encounters the i; 
ints a question mark (?) on the 
lestion mark, the computer 
for variables A$, I, and K: 
d from the keyboard. The data^lue 
variables in the statement, 
must be an alphanumeric or i 
le second and the third data 
• When the program encounters the 
ents , the screen will look as follows 


the program continues 
PUT statement, pauses 
screen. After printing 
waits for the three data 
d by commas to be 
s must match the 
. That is, the first data 
alphabetic character(s) , 

1 values must be numeric 
- input and the print 


OUTPUT 4.1 


SHAH, 450 


SHAH 


In the above output, when the 
statement number 100 


computer encounters 

1 ; -n t .,;ry T ■■ T'/j «q r q j ({ 


it will type 
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You will then type SHAH, 450, 50 to match the v aria- 
bles list in the INPUT statement. After your press ENTER 
key, the computer prints SHAH 450 50. However, if you 
respond to the above question mark by only typing and 
pressing ENTER, the computer will respond with 


o 

*7 


Redo 


from 


start 


This indicates that not enough data has been entered. 
Further, if you enter a string (alphabetic) data in re¬ 
sponse to a numeric variable, the computer will also ask for 
"redo from start," and wait for you to repeat the INPUT 
operation. 

On some systems, when inputting alphabetic or alphanu¬ 
meric variables, the information should be enclosed in 
quotation marks for each variable. Most often, on the 
screen a small blinking light next to the question mark will 
appear. This blinking light is called the cursor. As a 
character of the data is typed, it moves the cursor one 
space and the character is displayed on the screen. This is 
called echoing. After the data is typed and the ENTER key 
is pressed, the program will resume its processing until 
another INPUT is encountered, at which time it will again 
pause and print ? on the screen to request data. 

• 

However, it is advisable that whenever an INPUT state¬ 
ment is used in a program, the person at the keyboard should 
be told what type of value is being requested. That is, the 
person should be prompted. One of the ways to prompt a 
person is to have a PRINT statement preceding every INPUT. 
For example, 


PROGRAM 4.2 

100 PRINT"Type the name of the customer, item number and quantity" 
110INPUT A$,I,K1 

I 120PRINT A$,i,Kl 
130END 
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Line number 100 prints the message, and line number 
110 waits for the information to be inputted. The screen for 
this program appears as follows: 


OUTPUT 4.2 

Type the name of the customer, item number and cruantitv 
? SHAH,450,50 

SHAH 450 50 


The PRINT statements identify the type of information 
the user should enter. Instead of all three values being 
entered on one line, the three values may be entered sepa¬ 
rately, as in the following example. 




PROGRAM 4.3 

100 

PRINT " 

Type the name of the customer" 

110 

INPUT 

A$ 

120 

PRINT 

"Type the item number" 

130 

INPUT 

I 

140 

PRINT 

"Type quantity" 

150 

INPUT 

K1 

160 

END 



The screen for this program appears as follows. The 
letters are messages printed by the print statem^?« 
the capital letters are the responses typed by the user 
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OUTPUT 4.3 

Type the name of the customer 
? SHAH 

Type the item number 
? 450 

Type the quantity 
? 50 


However, if one wants the data to be entered on the 
same line where the message was printed, then a semicolon 
should be typed at the end of each PRINT line. For example, 
the above program would appear as follows: 




. 1 ~' 

1 1 . 


PROGRAM 4.4 

100 

PRINT 

"Type the name of the customer"; 

110 

INPUT 

A$ 

120 

PRINT 

"Type the item number"; 

130 

INPUT 

I 

140 

PRINT 

"Type quantity"; 

150 

INPUT 

K1 

160 

END 

. ij - • 


The screen of the above program appears as follows. The 
messages of the program are printed in small letters, and 
the user has typed-in the responses in capital letters at 
the end of each message line. 

'» , t i •' t 


OUTPUT 4.4 

Type the name of the customer? SHAH 
Type the item number? 450 
Type the quantity? 50 

i ■ . i, i n 

v*. VO , c . * i 
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Because the BASIC language is meant for interactive 
programming, prompting for inputting data has been made a 
part of most versions of BASIC. That is, INPUT statements 
can include a message within the statement. For example, the 
above program could be entered as follows: 

A •. p.: -if. ' t • t ’ 

r*t. /> i. 




PROGRAM 4.5 - . , • ■ 

100 

INPUT 

"Type the name of the customer", A$ 

110 

INPUT 

"Type the item number",I 

120 

PRINT 

"Type quantity",K1 

130 

i 

END 

: ■*". ; 

■ -to r -Ji . >. *i..v,y t ; ■-.»> : 


\ 


The screen (output) for the above program appears as fol¬ 
lows. The program has printed the messages in small letters 
and the user has typed the responses in capital letters. 

' - ,‘.t ; i.i: 

• . . -•;» ’ .•/ ' . ;• . • ■ ' . . >• ’ ' . f : _ . 

, : " . 1 z ’ ' n ' 

* * £*\ ' <. 3 if . '*• 'iJ ‘ ' r; r , ■*. ; 


OUTPUT 4.5 

Type the name of the customer? SHAH 
Type the item number? 450 
Type the quantity? 50 

•' * ’ jy.c -.u. '■ J 


■:.! /. • < ■ r • 


Suppose you want to create a program where customers 
are billed based on the type of item and the quantity they 
buy. The following program shows how to input the data and 
print out the bill. 
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PROGRAM 


4.6 


100 PRINT "Enter the customer's name"; 
110 INPUT N$ 

120 PRINT "Enter item number"; 

130 INPUT I 

140 PRINT "Enter quantity"; 

150 PRINT K1 

160 PRINT "Enter price"; 

170 INPUT P 
180 T= P*K1 
190 PRINT N$ 

200 PRINT "Quantity ", Kl, 

210 PRINT "Total Amount $ " 

220 END 


Price per unit , P 
T 


In this program four values for variables, N$, I, Kl, and P 
will be needed, and the computer will print out the custom¬ 
er's name, item number, quantity ordered', the price per 
unit, and the total amount. The input and the output will 
look as follows: 


OUTPUT 4.6 




Enter the customer' 

s name? 

SHAH 


Enter item number? 
Enter quantity? 10 
Enter price? 5 

211 



£>HAH 

Quantity 10 

Price 

per unit $ 

5 

Total Amount $ 

50 
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READ STATEMENT 


The INPUT statement is one way of getting data values 
into a program. When one uses the INPUT statement, the 
computer types a ? and then waits for a user to type in a 
value. After one types it in and presses RETURN or <enter> 
key, the computer then stores that number in its memory. But 
if one has a lot of data that won't change from run to run, 
then the READ/DATA statement is a better method for getting 
information into the computer. The READ and DATA statements 
provide another way to enter data into a BASIC program. 
These two statements always work together. This method of 
entering data into a program works a little differently than 
the INPUT statement. The READ statement searches through the 
BASIC program until it finds the first DATA statement. The 
computer then assigns the data values in the DATA statement 
consecutively to the variables in the READ variable list. 
That is, values contained in the DATA statements are as¬ 
signed to variables listed in the READ statements. 


The READ statement reads data from a sequence of data 
items in the DATA statement and assigns them to the varia¬ 
bles in the READ statement. The READ statement consists of 
the keyword READ followed by a list of variables separated 
by mandatory commas. The variables may be numeric or string 
variables. The general format of the READ and DATA state 
ments are as follows: 


Ln READ variable list 

Ln DATA data list 


Farh READ or DATA statement is preceded by a State- 
Each READ or l or DATA, and a blank 

^;L^ e the key words; a^ y it is then followed by variable 
Appropriate to the type of data to be read. The 
variable must be separated by a comma. 


each 


The data 
variable 


list is a list of data values, one value for 
in the READ statement, separated by commas. 
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The data value must match the type and the order of the 
variables in the READ statement. For example, 



d b • J 


OUTPUT 4.8 


-j 


40.1 


smith 
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Note that when two or more data values occupy a line, 
they are separated by commas. Character strings may or may 
not be enclosed in quotation marks in DATA statements. 
However, if the character strings are to contain leading or 
trailing blanks, commas, and/or semicolons, they must be 
enclosed in quotation marks. 

In the Program 4.7, the READ statement in line 10 will 
assign values in line 20 to the variables Al, Bl, and A$. 
The READ statement informs the computer to create a memory 
storage named Al and take the first value in the DATA state¬ 
ment and put it in the Al storage memory (Keep in mind that 
if there was a variable named Al previously created and had 
a value in it, the variable value will be replaced by the 
new information). The second variable Bl (memory storage) 
will store 30, and the third variable will store Smith. 

It is not necessary to group the variables and data as 
shown above. That is, more than one DATA statement may be 
used to satisfy one READ statement and more than one READ 
statement may be satisfied from one DATA statement. For 
example, the following statements are also acceptable: 


PROGRAM 4.9 

10 READ Al,Bl,C2 
20 READ A$,B$ 

30 DATA 20,30,40.10,Smith,Job 
40 PRINT A1,B1,C2,A$,B$ 

50 END 



OUTPUT 4.9 


20 30 


40.1 


smith 
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PROGRAM 4.10 

10 READ A1,B1,C2 
20 READ A$,B$ 

30 DATA 20,30,40.10 
40 DATA Smith,Job 
50 PRINT A1,B1,C2,A$,B$ 
60 END 




OUTPUT 4.10 



20 

30 

40.1 

smith 

Job 


The variables in the above READ statements match the 
numeric and string variables in the DATA statement. That is, 
A1,B1,C2 are numeric variables which match with 20, 30, 40.1 
respectively, and string variables A$,B$ match "Smith", and 
"Job" respectively. To understand how the data is read, it 
is helpful to think of a data pointer that moves through the 
data list and points to the data value that is to be read 
next. In the statement number 10, the data pointer is 
pointed at the first item in the data list. For the READ 
statement 20, the data pointer will be at "Smith." Keep in 
mind that some systems will require the string constant to 
be enclosed in quotes. That is, the above data statements 
20, 30, and 40 might have to be written as follows: 


20 DATA 20,30, "Smith" 

OR 

20 DATA 20 ,30,40.10,"Smith","Job" 
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OR 

30 DATA 20,30,40.10,"Smith","Job" 
OR 

40 DATA "Smith", "Job" 


The DATA statement could be placed anywhere in the 
program between the END and the declaration statements. 
However, it is customary to place all the DATA statements at 
the beginning of the program or at the end of the program 
just before the END statement. However, the READ state¬ 
ments, like INPUT, are located wherever the logic of the 
program indicates the need for data. The READ statement 
should occur somewhere before the LET statement in the 
program where the variables to be read by the READ statement 
are used. The BASIC interpreter or compiler simply takes 
all the data items and forms one combined data list, order¬ 
ing the DATA statements from lowest line number to highest 
and then using the data from left to right. For example, the 
following three statements look different, but the data 
lists they produce are alike: 


10 INPUT A$,A1,B$,B1 
10 DATA "Job",66 
20 DATA "Carl",55 
OR 

10 DATA "Job" ,66,"Carl" , 55 


Results Stored as: 


Storage 


A$ 

Job 

A1 

66 

B$ 

Carl 

B1 

55 
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To create a READ/DATA statement, one should follow 
these rules for writing the READ statement: 



READ/DATA Statement RULES 


1 : Every variable whose value is obtained by a READ should be 
listed in a READ statement prior to its being used 
elsewhere in the program. 

2: A READ statement in a program must also have at least one 
DATA statement with matching values to be assigned to the 
variables listed i;: the READ statement. 

3: Only commas should be used to separate values and variables 


4: No comma should be placed at the end of the READ or DATA 
statement. A comma following a variable means the existence 
of another variable for which data to be read. 



The examples would indicate the variables in the READ 
and the DATA statements must match perfectly. However, the 
BASIC is looking only for variables in the READ statement. 
That is, there should be at least as many data items in the 
DATA statement as the number of variables in the READ state¬ 
ment. Therefore, having more data items than the number of 
variables in the READ statement does not cause any error. 
For example, 


1 

PROGRAM 4.12 

10 

READ A1,B1,C1,C2 

20 

DATA 30,10.10,35,40,60,70 

30 

PRINT A1,B1,C1,C2 

30 

' END 
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In this example, there are four variables in the READ 
statement and six data items in the DATA statement. Obvious¬ 
ly • there are two more data items than the number of varia¬ 
bles in the READ statement. This would not cause error. The 
computer will stop reading the additional data after the 
data for variable C2 is read. The output in this program 
looks as follows: 



OUTPUT 

4.12 


30 

10.10 

35 

40 


On the other hand, an error will occur if there are 
fewer items in the data statement that the number of varia¬ 
bles in the READ statement. For example. 


PROGRAM 4.13 

10 READ A1,Bl,Cl,C2 
20 DATA 30,10.10,35 
30 PRINT A1,B1,C1,C2 
30 END 

1 


When this program is run, the OUT OF DATA in 10 mes¬ 
sage will be printed. That is, there are no data items for 
variable C2. After reading data item 10.10 for variable Cl 
it moves to read C2. However, when it comes to read the data 
item in the DATA statement, there is no more data available 
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to be read. Thus, the OUT OF DATA message is printed. The 
output of this program would looks as follows: 



A message indicates that the end of the data list has 
been reached when a READ statement attempted to read a data 
list that has been exhausted. The message points out the 
line number of the READ statement in error. 


PROGRAM 4.14 


100 PRINT "Enter the customer's name"; 

110 INPUT N$ 

120 PRINT "Fnter guantity"; 

130 PRINT K1 
140 READ P,I 
150 DATA 221,5 
160 T= P*K1 
170 PRINT N$ 

180 PRINT "Quantity ", Kl, " Price per unit $" p 
190 PRINT "Total Amount $ ", T * " 

200 END 
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OUTPUT 4.14 

Enter the customer's name ? SHAH 

Enter Quantity? 50 

SHAH 

Quantity 50 Price per unit 
Total Amount $ 11050 


$ 


221 


In all these examples, each DATA statement has one 
matching READ statement. That is, each DATA statement is 
processed by a READ statement only once. However, if one 
the system to read the same data items later, one must 
use the RESTORE statement to restore the data. 


RESTORE Statement 

Generally each READ statement has its own associated 
DATA statement, as the READ statement reads its data values 
from its DATA statement. But in some cases, you may want to 
reuse the same data values by another READ statement. You 
can accomplish it by either retyping the data in another 
DATA statement to match the READ statement. However, a 
better approach is to use the RESTORE statement. The RE¬ 
STORE statement allows the data in a given program to be 
reread as often as desired by other READ statements. The 
RESTORE statement consists simply of the keyword RESTORE. 
The general form of the RESTORE is: 


Ln RESTORE 


large computers (mainframes) use this form* The 
RESTORE statement causes the pointer to be moved back to the 
beginning of the data seguence holding area. This is done so 
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that the next READ statement executed will read the data 
from the beginning of the sequence once again. For example: 


PROGRAM 4.15 

10 READ A1,B1,C2 
20 READ A$,B$ 

30 DATA 20,30,40.10,Smith,Job 
40 PRINT A1,B1,C2,A$,B$ 

50 RESTORE 
60 READ A1,B1,C2 
70 READ A$,B$ 

80 PRINT A1,B1,C2,A$,B$ 

90 END 


In the above program, the READ statements 10 and 20 
will read data line number 30, and then the RESTORE will 
restart the data line 30 again and the READ statements 50 
and 60 will read the same data again. 




OUTPUT 4.15 



20 

30 

40.10 

Smith 

Job 


The general form of the RESTORE for microcomputer is: 

Ln RESTORE line number of the DATA statement 
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i 

This format allows you to select the DATA statement 
where the next READ statement will read its data values. 
That is, by specifying the DATA statement number, you can 
select the DATA statement where the next data will be read. 
For example, 



PROGRAM 4.16 


10 

READ A1,B1,C2 


20 

READ A$,B$ 


30 

DATA 20,30,40.10 


40 

DATA Smith,Job 


50 

PRINT A1,B1,C2,A$,B$ 


60 

RESTORE 40 


70 

READ C$,D$ 


80 

PRINT C$,D$ 


90 

END 



In the above program, the READ statements 10 and 20 
read the data in DATA statement 30. The PRINT statement 50 
prints the values. Line number 60 restores the DATA state¬ 
ment 40, and the READ statement 70 reads the two names. The 
output would look as follows: 


OUTPUT 4.16 


20 30 40.10 
Smith 


Smith Job 
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The RESTORE statement is generally used when it is necessary 
to perform several types of computations on e same data 
items. 


The PRINT Statement 

A program is written to solve a problem. However, the 
program is of no value unless it shows the results on the 
screen or on paper. To accomplish this, the PRINT statement 
should be used. The format of the PRINT statement is a 
follows: 


Ln PRINT "message" and/or list of variables 


The PRINT statement is preceded by a statement number, 
a blank, and a blank following the keyword PRINT; and it is 
then followed by variable name(s) appropriate to the type of 
information already stored in the memory of the computer 
under the variables names to be printed. The variable names 
are separated by either a comma or semicolon. 


For example, 



PROGRAM 4.17 

10 

I = 10 

20 

K = 30 

30 

K1 = 40 

40 

LI = 60.10 

50 

D2 = 44.20 

60 

PRINT I 

70 

PRINT I,K 

80 

PRINT K1,LI,02, E3 

90 

END 
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resultantstatement causes the computer to bring the 
v lue , , f .. the me mory of the computer and displays the 

PRINT statempn^ Y aria *>le(s> on the screen. That is, the 
j ^ . ls use d to display memory storage values. 

Ho P 3 a ^ headin 9 or message. The PRINT statement can 
i \r *"° co pt-rol the format of how the output should 

look, and the spacing of the output. 


In the above example, statement 60 will display the 
value of I on the first line; statement 70 will display the 
values of I and K on the second line; statement 80 will 
display the values of Kl, LI, D2, and E3 on the third line. 
The output of the above program will look as follows: 


OUTPUT 4.17 

Column Numbers To Indicate where Values are Printed 

1 2 3 4 5 6 

123456789012345678901234567890123456789012345678901234567890 


10 




10 

30 



40 

60.1 

44.2 

0 

10 

30 

40 

-60.1 


Keep in mind that values of the variables must have 
been assigned; that is, variables I, K, Kl, LI, D2, E3 must 
been defined previously either through a READ or an INPUT or 
LET statement, e.g. lines 10 through 50. In the above pro¬ 
gram, the value of E3 is undefined. Therefore, the computer 
has assigned it a value of zero (0) . 

Commas or semicolons are placed between variables, a 
comma separator allows the output to be produced in a tabu¬ 
lar form determined by the print zones of the system. That 
is, the PRINT statement prints one print line unless the 
number of variables exceeds the number of the print zones or 
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the PRINT statement ends with a semicolon. The 
plays the output at the next available print zone. On the 
other hand, the semicolon displays the output at the next 
available position and not at the next print zone. The 
semicolon computer instructs the computer to keep tne print 
in the next available print position and not to move to the 
next print zone. For example: 


PROGRAM 4.18 

| 10 

I = 10 

20 

K = 30 

|| 30 

K1 = 40 

40 

LI = 60.10 

50 

D2 = 44.20 

60 

PRINT I 

70 

PRINT I;K 

80 

PRINT K1;L1;D2;E3 

90 

END 


The output of the above program will as follows: 


OUTPUT 4.18 

i 

Column Number To Indicate Where the Values are Printed 

1 2 3 4 5 6 

123456789012345678901234567890123456789012345678901234567890 
10 

10 30 

40 60.1 44.2 0 
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In this example, the values are printed close to each 
other instead of within the 14 positions available for each 
print zone. The reason for the difference is that in the 
above PROGRAM 4.16, commas were used while PROGRAM 4.17 used 
semicolon. 

The PRINT statement in BASIC displays the values of 
the variables into print zones. Most BASICS establish a 
print area of a specific number of characters and divide 
them into print zones. The size of print zone varies among 
systems. However, most computer systems use five print zones 
per line. Each print line has 70 positions divided into 14 
positions per zone. Each print zone specifies an area for 
a variable to be printed or displayed. 

The following rules are applied when data is printed by a 
PRINT statement with a comma as a separator. 


PRINT ZONE RULE WITH COMMA AS A SEPARATOR 
Each PRINT statement displays one line, unless 

1. The PRINT statement has more than five variables. Line 
130 in PROGRAM 4.19 shows this exception. In such cases, 
the first five variables are shown in the first print 
line, the next five in the next line and so on. 

2. The PRINT statement has a comma as a last character. 

For example, line 140 in PROGRAM 4.19 ends with a comma. 
The variable in line 150 will be printed on the same 
line but at the next available print zone. 


The zones are numbered consecutively, starting with posi¬ 
tion one, as follows: 

t _ 15 <->28 29<->42 43<->56 57<->70 

print print print 

zone 3 zone 4 zone 5 


print print 

zone 1 zone 2 
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However, it is advisable to have a message with the 
P r ^ n ^- e< ^ value. The PRINT statement could be used to print a 
message or a message and the variables' values. For example 
to rewrite (3.8): 



These statements will print the results as follow: 
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The blank line can be printed by using the PRINT 
without message or variable(s) list. In the above program, 
line 90 will print a blank line as shown in the output. The 
PRINT statement also allows calculation to be made within 
the PRINT statement. For example. 


PROGRAM 4.21 

10 LET L = 10 
20 PRINT 6/7, 10*2, L 
30 END 


This PRINT statement has two equations and a variable. 
That is, the first equation divides 6 by 7, the second 
equation multiplies 10 by 2, and the variable L is printed 
from the memory. These statements will give the following 
output: 



OUTPUT 4.21 


.8571429 

20 

10 


In addition, the PRINT statement could be used as a 
calculator. If one needs quick calculations without having 
to create and run a program, the PRINT statement could be 
used for that purpose. Any time a quick calculation is 
needed, use the PRINT statement without a line number. That 
is, 
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PRINT 1000/5, 6*6, (5+4)‘2 


This statement will print the following results imme¬ 
diately after pressing the RETURN key: 


200 


36 


81 


This type of PRINT statement could be used anytime, 
especially during debugging a program.' In order to print 
the values of the variables executed during the execution of 
the program, one just types the PRINT statement with the 
list of variables. 


The TAB Function in PRINT Statement 

The PRINT statement controls the vertical output of 
the program. With the proper use of commas and semicolons 
within the PRINT statement, the output could be created with 
proper spacing. However, the same result could be achieved 
with the TAB function which helps control the horizontal 
spacing of the output. The TAB function embedded in the 
PRINT statement specifies the exact print position of the 
output on a given line. In effect, the TAB function moves 
the printer or the cursor to a specified position. That is 
the TAB function operates a tabulator key on a typewriter. 

The general form of the TAB function is: 


Ln PRINT TAB(numeric expression), variable list 


The PRINT statement is preceded by a statement number, 
blank, and a blank following the keyword PRINT; and it is 
then followed the keyword TAB with a numeric value or an 
expression within the parenthesis, and by variable name(s) 
appropriate to the type of information already stored in the 
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memory of the computer under the variable names to be print¬ 
ed. The variable names are separated by either a comma or 
semicolon. However, use semicolon between variables. If 
comma is used, it would print the next variable in the next 
print zone. 

The numeric expression may be an integer value, an 
expression, or a variable. The value of the expression 
determines the print position relative to the starting 
position of the line. 

The print positions are numbers beginning with 1 on the 
left. For example, 


PROGRAM 4.22 


10 L = 10 

20 PRINT TAB(10),"John Doe",TAB(30),"Preston Street",TAB(55) L 
30 END 


will display output as 


OUTPUT 4.22 


Column number 

1 2 3 4 5 e 

123456789012345678901234567890123456789012345678901234567890 

John Doe Preston Street 
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nSmber SS i a o 9 e an°d lon^n ent 10 ‘ ," John Doe '" starts at column 
completely That iq M^ eS i untl ^ t ^ 1G message is displayed 

“Sn lY; a tota!' ofeioht 1 f t °‘V he is prinW.t 

“Preston Street" is nrim-Ji^r characters - Then th® message 
er, where TAB funrHnn ^ d starting at position 30 . Howev- 

digit p r o e sitfon f o n n Ct t h °e n l^Is left ^ n r k lc f Val “ e ' the firSt 

jzJzrz f4° rtant ^ - - n -nc : 

each variable careful ^^ 
Example, re to l ^vn:\te^PROGRAM h 4.22 f PUt WlU b6 i—rect. 
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The letters "oe" of "Doe" of the name John Doe are 
truncated and overwritten by the word USA. In the print 
statement, without a proper count of spacing, not enough 
spaces (at least nine spaces) were provided for John Doe. As 
a result, when the next TAB function was used, the word USA 
was printed at location sixteen (as specified by the TAB(16) 
— thus overwriting the last two letters of the word DOE. 
However, in some cases instead of overwriting the previous 
value, the computer will print the word USA in the 16th 
column of the next line output. Further, if there are not 
enough spaces left on the line to fit the value of a varia¬ 
ble, the value will be placed on the next output line. 

A variable can be used to tell the computer where to 
print. For example. 




PROGRAM 4.24 


10 

M = 10 



20 

N = 10 



30 

PRINT TAB 

(N);"SHAH";TAB(N*2);"COMPANY" 


40 

PRINT TAB 

(5) ;" 

II 

50 

PRINT TAB 

(15);" SALARY TABLE" 


60 

PRINT TAB 

(5);"NAME";TAB(M);"SALARY" 


70 

PRINT TAB 

(5) ;" 

it 

80 

END 




In the above program, variables and an expression are 
used in the TAB function. In line 30, TAB (N) indicates to 
print SHAH starting in column 10, and TAB(N*2) indicates to 
print COMPANY starting in column 2 0 defined by N times 2 or 
(10 x 2 = 20). This is an acceptable way to use the TAB 
function. 
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PRINT USING STATEMENTS 


of the output than ™ 0 statement Provides for better control 

PRINT USING stat-p™ ° f methods discussed so far. The 

symbols to soeci?vT US ? S 3 fornat character in the form of 
y ois to specify format. The PRINT USING provides for: 


a) 

b) 

c) 


* X .* ct in »age of a line of output; 
displayed wh decima J;. and the number of digits to be 
speciAc a tion e of Pri lng c ? lumnar tables with numeric; 

th^^m^Tndlhrrilar^^s^nr"^' "" ^ ° f 


The general form of the PRINT USING is: 


Ln PRINT USING format number; variable(s) list 
or 

Ln PRINT USING string expression; variable(s) list 


The PRINT USING statement consists nf +-k« t, 

PRINT and USING followed by the format enrlnL^ keywords 
marks, followed by a semiLlon; a™d the list of" 
separated by a comma. lst of variables 

These sre the most conunon f orm<? n n 

statements. Most of the microcomputers and the P ?Ju T USING 
use the second form. The other mainframe system" SyStems 
first form. One should check the syste.'/.l" , f' e the 
appropriate form. However, the second form will be di ° r an 
here. The format to be used with the PRINT statef . CUSSed 
use certain standard symbols. statement must 
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They are: 


Symbol USE 

# This symbol is used to specify a numeric field. 

One symbol is needed for each digit. 

For example: 

### allows for three digits 

####.## allows for six-digit number, four 

digits to the left of the decimal and 
two to the right of the decimal 

The period symbol is used for placing a decimal 
within a number. If a number is a floating (real) number, 
you must provide for a decimal. 

+ or - The plus or minus sign indicates the status of a 
number. 

For example: 

-####•## a number will be printed with a negative sign 
+ a number will be printed with a positive sign 

$ The dollar sign as the first character displays the 

number with a dollar sign. For example, 

$####.## 

\\ The backslash separated by an appropriate number of 

blank spaces determines the number of characters to 
be printed for alphabetic or alphanumeric variables. 

The two backslashes account for two character 
spaces. 
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For example: 

column numbers 
123456789 

\ \ this format provides for 8 characters, i.e., 

T * sl * blank spaces between the two backslash, 

is charac ters in the variable memory 

s *-^ e J 1Ze ° f the the left most 

in thf» v on ly- If the number of characters 

fnJZit friable memory is more than the size of the 
ormat, the right most characters are cruncated. 

A comma is used to place a comma within a number. 

For example 

###,###,###.## 


For example, a program containing all these formats 
could be written as follows: rormats 




PROGRAM 

4.25 


10 

PRINT 

"\ 

\"; "INTEREST TABLE" 


20 

PRINT 

"#######.## 

####-## ######.##"; 

PAT 

30 

PRINT 


#,###-## ###,###.##" 

;P,A I 

40 

PRINT 

"\ 

\"• "Interest Amount 

is",A 
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OUTPUT 4.25 


INTEREST TABLE 

90000.00 5400.00 

90,000.00 5,400.00 

Interest Amount 5400 


Example of format: 


Field 

Format 


Variable or 
Constant 


Output 


Discussion 


##### 

####### 

### 


56789 

56789 

56789 


56789 five-digit constant printed as is 
bb56789 five-digit number in seven spaces 
%56789 five-digit number to be printed 

in three spaces, not enough spaces 
for the number. This is indicated 

by % (percent) sign in front of 
the number. 


\ 


\ 


###.## 

567.89 

567.89 

###.## 

567 

567.00 

###.## 

67.686 

67« 69 

##,###.## 

56789.9 

56,789.90 

##,###.## 

789.9 

bbb789.90 

$#,###.## 

56789.9 

$56,789.90 

$#,###.## 

6789.9 

$ 6,789.! 

$$,###.## 

6789.9 

$6,789.9 

\ \ XYZ 

\ XYZ 

\ UNITED STATES 

XYZ 

XYZbbbb 

UNITEDb 


\ \ 
\ \ 


PAKISTAN PAKISTAN 
PAKISTAN PAKIS 


number with a $ sign 
30 number with a $ sign, a space 
between the $ sign and the first 
digit. 

format with two $ signs. Number 
with a $ sign, and the $ sign is 
placed next to the first digit. 

size fits the number of characters 
three characters in seven spaces 
thirteen characters in seven spaces 
Last word STATES truncated. 

eight characters in eight spaces 
only the first five characters are 
printed 
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Make sure to provide enough symbols in the format 
statement to accommodate the largest number or string that 
is to be printed in that field. If the number to be printed 
is less than the spaces provided, the number will be printed 
in the rightmost position. If the number to be printed is 
greater than the spaces provided, the number will be trun¬ 
cated and error message, or % (percent) sign will be printed 
at the beginning of the number. In the case of characters, 
they are printed at the leftmost position, if more spaces 
are provided than the number of characters to be printed. 
However, the rightmost characters are truncated if fewer 
spaces are provided that the number of characters to be 
printed. 


LPRINT 

In programs where output has to be printed on the 
printer instead of being displayed, it is advisable to use 
the LPRINT or LPRINT USING statement rather than PRINT. The 
general form is the same as PRINT. However, keep in mind 
that there will be no output displayed on the screen. 
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QUESTIONS 

1. What are some of the ways a BASIC program can be pro¬ 

grammed to check for errors in data? 

2. If the computer prints "Not Enough Data," what could be 
the possible reasons for getting this message, 
would you solve this problem? 

3. What does the "Out of Data" message mean? 

4. What does the "Redo" message mean, and what causes this 
message? 

5. What are the differences between logical errors and syntax 
errors? 

6. Describe the three ways of inputting data into a Basic 
program? 

7. Correct errors, if any, in the following statements. 

a) INPUT N, M/N 

b) INPUT 2N, 2, N 

c) INPUT N, M, C 

d) INPUT N*N, Ml, C23, XYX, N+2 

e) INPUT N;M;K 

f) INPUT N,M,K, 

g) INPUT N$,M, K1 

g ^ Write a program segment that asks for a date as a string 
in the form of dd/ram/yy, and then prints it. 

9. Discuss situation(s) where the INPUT statement will be 
more appropriate than the READ/DATA statement. 

10 Write a program segment where inputting data is indi - 
cated by a message that tells you what to enter. 

11 . What is interactive programming? Discuss its advantages. 


92 


Scanned by CamScanner 



Chapter 4 


12. Write a program segment which reads r.aies, ID numbers, 
arid pay rates of employees ar.d prints them. 

13. Correct errors, if any, in the following statements. 


a) 

HEAD 

DATA 

N,K,I 

10, 20 

b) 

READ 

DATA 

N,K 

10, 20, 

c) 

READ 

DATA 

5$, P 
Syed, 10 

d) 

READ 

DATA 

NS, P 

10, Syed 

e) 

READ 

N,M,X 


14. What is the RESTORE statement used for? 


15. Correct errors, if any, in the following statements. 
Assume that the variables used in the PRINT statement 
are already defined (known to the computer) . 


a) PPJJT N, K, I 

b) PPJ3PT "KARACHI, M, 10/3 

c) Pimrr ns, ■shadl-, 5 

d) P2J3PZ N$;; "PAKISTAN" ; 10; 5,6 

e) PRINT 


16. Explain how the print zones work. 

17. What is the purpose of the TAB function? Write a pro¬ 
gram segment which shows the use of the TAB function. 

13. Describe a situation where you will use the PRINT USING 
statement. 
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19. What does the LPRINT statement do? 

20 . Suppose your teacher gives five examinations worth 100 
points each, assigns 20 homework problems worth 10 
points each, and assigns 100 points to class attendance 
during the year. Write a program that reads and prints 
the names of the students, their examination grades, 
homework points, class attendance points, and calcu¬ 
lates and prints the average grade for each student. 

21. Write a program that calculates and prints interest for 
any loan amount, the duration of loan, and the interest 
rate. 

22. Write a program that calculates the Body Mass Index. 
The Body Mass Index is used as a standard for determin¬ 
ing body weight for men or women in a country. For 
example, the Body Mass Index is 27.8 for men and 27.3 
for women in the United States. The equation for calcu¬ 
lating the Body Mass index is : 

2 

Weight (in kilograms ) - Height (in meters ) = index 


For example, a person weighing 200 lbs. ( 90.91 kilo¬ 
grams), and is 6 feet ( 1.83 meters) tall would have 
27.20 as a Body Mass Index. The calculation is shown 
as: 


2 

90.91 - (1.83) = 90.91 - 3.342 = 27.20 


23. Write a program that prints address labels. 

24. In 1988, the population of Pakistan was estimated to be 
100 ,000,00, and was growing at the rate of 3.25 percent 
a year. Write a program that will project the popula¬ 
tion into the year 2010. For example, 

22 

P = P * ( 1 + .0325) 
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Write a program that prints the following letter as is. 


a 

aaa 
aa aa 
aa aa 
aa aa 
aa aa 

aaaaaaaaaaaaa 
aa aa 

aa aa 

aa aa 

aa aa 

aa aa 

aa aa 

aa aa 
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PROGRAM REPETITION 

So far every program shown could use one set of data 
or input in each run. That is, after the command RUN is 
typed, the program will be executed from the beginning to 
the end in sequential order and will stop execution. Howev¬ 
er, there are situations where you may want to input more 
data or let the same set of statements read and execute more 
data, or change the sequence of the execution in the pro¬ 
gram. For example, the following program will run only once: 




PROGRAM 5.1 

10 

INPUT 

"Type the amount of loan"; P 

20 

INPUT 

"Type the interest rate"; I 

30 

A = P 

* I 

40 

PRINT 

"Amount "; A;"Loan "; P ; "Interest rate ";I 

50 

END 



The statements discussed so far do not provide for 
such a possibility. Therefore, we need to learn a method by 
which we can make the following program repeat itself and/or 
change the sequence of the execution of the program. That 
is, it should ask for more data input without typing the 
command RUN. 
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To accomplish program repetition or change the 

fl °rrvrn ^ t CUt there are man y statements in BASIC, such 
as GOTO, IF.. THEN, IF.. THEN ... ELSE, ON..GOTO, and oth¬ 
ers. 


GOTO Statement 

• u T he < ? 0T0 (° r 9° T0 ) is one of the BASIC statements 
which breaks unconditionally the sequence of execution of 

the program. The purpose of the GOTO statement is to break 
the normal sequential execution of the program and continue 
execution at the statement specified in the GOTO statement. 
This transfer of control to another point in the program is 
called branching or control transfer. The general form of 
this statement is: 


Lnl GOTO Ln2 


The (Lnl) is the line number of the GOTO statement; 
the keyword is GOTO, which can be written as one word or as 
two words, GO TO; and the line number (Ln2) follows after 
the word GOTO. The last line number in the statement refers 
to the line number of the statement to which the program 
will transfer control when the computer reaches the GOTO 
statement during the execution. For example, 


10 GOTO 300 


In this statement, the number 10 is the statement 
number of the GOTO statement in the program, and the state¬ 
ment number 300 in the statement is the statement number in 
the program where the computer will branch to. It is possi¬ 
ble to branch out from either direction in the program — 

that is, from the bottom of the program to the top of the 

program or from the top of the program to the bottom of the 

program. Make sure that there is a line number 300 in the 

program. If there is not such a line number in the program, 
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you will get an error of UNDEFINED LINE number. The GOTO 
statement can also be used for looping, which is the process 
of executing a group of statements repeatedly. For example, 


PROGRAM 5.2 


10 INPUT "Type the amount of loan"; P 
20 INPUT "Type the interest rate"; I 
30 A = P * I 

40 PRINT "Amount "; A;"Loan "; P ; "Interest rate ";I 
50 GOTO 10 
60 END 


This program, a modified version of Program 5.1, can 
run repeatedly until interrupted (terminated) when the 
programmer presses a certain set of keys on the keyboard. 
This process of interruption of a program is called abnormal 
termination. In this program, the computer asks for the 
amount of a loan, and interest rate and prints the calculat¬ 
ed interest amount, loan amount, and interest rate. At 
statement number 50, the program finds the GOTO statement 
and line number 10 within the GOTO statement. The execution 
is transferred back to line number 10. Since line number 10 
is the first statement in the program, it starts the execu¬ 
tion of the program again. Therefore, this program is in an 
infinite loop. That is, the program will continuously ask 
for data and will print the results unless interrupted by 
the programmer. Before running a program with an infinite 
loop, check your computer system's manual to learn how to 
stop the execution of such a program. Most systems use 
CRTL/BREAK keys or CTRL/T or other combinations of keys with 
CTRL. That is, hold down the CTRL key and then press the 
other specified key. 
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The output of the above program would look as follows, 
including the error message due to abnormal termination: 


OUTPUT 5.2 

Type the amount of loan ? 1000 

Type the interest rate? .10 

Amount 100 Loan 1000 Interest rate .1 

Type the amount of loan ? 2000 

Type the interest rate? .05 

Amount 100 Loan 2000 Interest rate .05 

Type the amount of loan? (CTRL/BREAK) keys were pressed 

Break in 20 Note: This statement was the result 

of an abnormal break. 


The above output was the result of running Program 5.2 
and inputting two types of input information. After the 
third input request, the CTRL/BREAK keys were pressed to 
terminate the program. This abnormal termination resulted in 
the error message " BREAK IN 20." 

However, the effect would have been different if the 
program had been data in it. For example, Program 5.3 is a 
modified version of Program 5.2, except in this program the 
data is read rather than inputted. The computer will read 
four sets of numbers and then will run out of data. 



PROGRAM 5.3 


10 

READ P,I 


20 

A = P * I 


30 

PRINT "Amount "; A;"Loan "; P 

; "Interest rate ";I 

50 

GOTO 10 


60 

DATA 10000,.10,9000,.09,5000,. 

06,12000,.15 

70 

END 
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In the above program, the READ statement reads two 
numbers each time it is executed. However, there are a total 
of eight numbers to be read. When it reads the last numbers 
(12000, .15) and comes back to read additional data, there 
are no more numbers to read. This results in the message 
"Out of DATA in 20." The output of the program is shown 
below. 



OUTPUT 5.3 

Amount 

1000 Loan 

10000 Interest rate .1 

Amount 

810 Loan 

9000 Interest rate .09 

Amount 

300 Loan 

5000 Interest rate .06 

Amount 

1800 Loan 

12000 Interest rate .15 

Out of 

DATA in 20 Note : This message is the 



result of the READ 
statement not finding 
additional data to read 


The GOTO statement makes unconditional transfer or 
created an infinite loop in the program. These are undesira¬ 
ble programming techniques. A better method is to control 
when or under what conditions a transfer should be made or 
when a loop should end. 


Structured Programming 

It may be appropriate to discuss structured program¬ 
ming at this time. Most novice programmers consider program¬ 
ming as creating a set of statements to be followed by the 
computer during the execution of the program. The steps 
required to write a program were discussed previously- 
However, a good programmer would follow a structured pro¬ 
gramming procedure. Structured programming is a systematic 
process which requires writing programs that are well struc¬ 
tured. The objectives of a well structured program are: 
increased clarity, reduced testing time, easier maintenance, 
and more accurate results. In short, structured programming 
is easier to follow. 
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These objectives could be achieved by using a top-down 
modular programming approach. This means breaking down the 
program into modules or steps which make up the program. 
Further, structured programming requires the use of one of 
the following control structure techniques for a well struc¬ 
tured program: 

1 . Sequence: This requires putting all related statements 

in the order of their execution. That is, there 
is no statement transferring execution. 

2 . IF..THEN..ELSE: This provides alternative actions for 

execution. In this control statement, the 
computer tests the IF..THEN..ELSE condition 
for "true" or "false." If the condition is 
true, the execution is transferred to 
the statement number after the keyword THEN, 
otherwise to the statement number after the 
ELSE. 

3. FOR..NEXT: This provides for a specified number of 

repeated executions of a set of statements. 

DO..WHILE and DO..UNTIL are other types of 
statements which do repeated executions. 

However, structured programming could be written with little 
or no use of the GOTO statement. 

One of the BASIC control statements listed above is 
the IF..THEN statement. 


IF..THEN Statement 

If at any time you want the computer to alter the 
normal sequential order of execution based on condition you 
use the IF. . THEN statement. The general form of the state¬ 
ment is: 

Ln2 

Lnl IF relational expression THEN or 

statement 
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The statement consists of the statement number (Lnl) 
and the keyword IF followed by a relational expression which 
is followed by the keyword THEN, and either a statement 
number to which the execution will be transferred if the 
condition is true or a BASIC statement. An example of the 
IF..THEN with a statement number is: 


20 IF A>15 THEN 50 


The statement consists of statement number 20, the 
keyword IF, a relational expression (A>15), the keyword 
THEN, and a statement number 50. In this statement, if the 
value of A (undefined for now) is greater than 15 (a true 
condition), the execution will transfer to statement number 
50 in the program. Otherwise, if the condition is false (if 
A is not greater than 15), then the statement following this 
statement is executed. 

An example of the IF..THEN statement with a statement 
or message is: 

10 IF A>15 THEN PRINT "A IS GREATER THAN 15" 

or 

10 IF A>15 THEN B = 60 


In this example, instead of transferring control to 
another statement in the program, it executes the statement 
after the THEN if the A is greater than 15. Otherwise, the 
statement following this statement is executed. 

The IF..THEN statement is not limited to just numeric 
comparison. It could contain comparison of constants, alge¬ 
braic expressions, or numeric variables. Also, string con¬ 
stants and variables can be compared for their ascending or 
descending order. 
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Table 5.1 discusses several examples: 

TABLE 5.1 

EXAMPLES of the IF..THEN Statement 
Statements 


10 A = 10 Purpose : comparing a variable A 

20 IF A = 10 THEN 50 against constant number 10. 

Result : case of true condition, 
the program will transfer 
to statement number 50. 

10 A = 10 
20 B = 20 

30 IF A>B THEN PRINT " A IS GREATER THAN B" 

Purpose : comparing variable A 
against variable B. 

Result : case of false condition, 
the program will not 
print "A IS GREATER THAN 
B". 


10 IF 10 > 20 THEN PRINT " 10 > 20" 

Purpose : comparing two constants. 

Result : case of false condition, 
the message " 10 > 20" 
will not be printed. 

10 A = 2 
20 B = 3 

30 IF 40 < A*B THEN PRINT "40 IS GREATER THAN A TIMES B" 

Purpose : comparing constant with 
expression. 

Result : case of true condition, 

the message will be printed. 

(continued on next page) 
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10 A = "SHAH*' 

20 IF A<>"SHAH" THEN 60 

Purpose : string constant against 
string variable. 

Result i case of false condition, 

the statement following 
this statement will be executed, 


10 IF "SYED">"SHAH" THEN PRINT "SYED IS GREATER THAN SHAH" 

Purpose : string constant against 
string constant. 

Result : case of true condition, 
the message will be 
printed. 


In the last example in Table 5.1, the BASIC determines 
which characters are "less" than other characters using the 
ASCII or EBCDIC codes. In ASCII, numbers are less than 
letters, and some special symbols are less than numbers. 
Among letters, A is less than B, B is less than C, and so 
on. Therefore, SYED is greater than SHAH. 

The IF.. THEN statement can also be used to test for 
the end of a loop or end-of-file (EOF) condition. In the 
case of the READ/DATA statements, the IF..THEN statement 
could be used to look for a last data item that is disguish- 
able from the rest of the data in the DATA statement. This 
is called a trailer record or card (data item) . It is also 
called a sentinel record. After each READ statement, the 
IF.. THEN statement tests for this unique value. When the 
value is detected, the execution is stopped or transferred 
to another section of the program. For example, 
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PROGRAM 5.4 


10 READ P,t 

30 IP P » 0 THEN 70 

30 A - P * I 

30 PRINT "Amount "/ A;"Loan P ; "Interest rate ";I 
50 GOTO 10 

00 DATA 10000,.10,9000,.09,5000,.06,12000,.15,0,0 
70 END [sentinal values] 


In the above program, the last two values (0,0), 
sentinel values, In the DATA statement are unique values. 
That in, when the computer roads these two values, one for 
each variable P and I, tho condition in statement number 20 
1 b satisfied and the control is transferred to statement 
number 70. Since statement number 70 is the END statement, 
the execution of the program is terminated. The output of 
the program is as follows: 



OUTPUT 5.4 


Amount 

1000 Loan 

10000 Interest rate 

. 1 

Amount 

810 Loan 

9000 Interest rate 

. 09 

Amount 

300 Loan 

5000 Interest rate 

. 06 

Amount 

1800 Loan 

12000 Interest rate 

.15 


105 


Scanned by CamScanner 









Chapter 5 


The above output shows no abnormal termination mes¬ 
sage. The program ended under normal conditions. 

In the case of the INPUT statement, when the program¬ 
mers do not want to enter additional data, they just enter 
the unique (sentinel) value and the execution is stopped or 
transferred to another section of the program. For example, 


10 

PRINT 

PROGRAM 5.5 

"Type the loan amount. Type 0 (zero) to stop"; 

20 

INPUT 

P 

30 

IF P 

= 0 THEN 100 

50 

PRINT 

"Type the interest rate."; 

60 

INPUT 

I 

70 

A = P 

* I 

80 

PRINT 

"Amount "; A;"Loan "; P ; "Interest rate ";I 

90 

GOTO 

10 

100 

END 



Anytime you want to stop the above program, just type 
zero (0) as a value for the loan amount. The output of the 
above program is shown below: 


OUTPUT 5.5 

Type the amount of loan. Type zero (0) to stop ? 1000 

Type the interest rate? .10 

Amount 100 Loan 1000 Interest rate .1 

Type the amount of loan. Type zero (0) to stop ? 2000 

Type the interest rate? .05 

Amount 100 Loan 2000 Interest rate .05 

Type the amount of loan. Type zero (0) to stop ? 0 


106 


Scanned by CamScanner 






Chapter 5 


The above output shows that at the last input state- 

' 6 va ^ ue °f zero (0) was typed which terminated the 

program. 

soine ca ses it might be appropriate to let program 
. ? w man y times it has run and stop when the specified 
S • re ?5! led : This process is called counting loop and 
5 ^ 1] J ltlal izing a variable as a counter before it 

of ^or-o th t 1°°£: . Cou . nters are usually initialized to a value 
ho ' Ut ' T th i‘w 1S not re <P*ired. The initial value could 

J y th 9 ‘ the loop ' the value of the counter is modi¬ 
fy 1d (lncreased or decreased) every time the loop is execut- 

dP^rl h i e n 0 C °i n !! r is tested in the IF..THEN statement to 
determine whether the loop has exceeded the specified num- 

As an example, suppose we invested Rs. 1,000 in a 
bank for 5 years at 10 percent interest rate compounded 
annually. How much will our money be worth each year? As you 
can see, this program requires a loop to calculate the 
interest amount for each year for five years. Obviously it 
also requires an equation for compounding interest, i.e. 

Amount = Principal * (1 + interest rate) ** year(s) 

In addition, we will keep a counter (running total) of the 
number of years in order to stop the calculation of the 
interest amount when we reach five years. The program would 
look as follows: 




PROGRAM 5.6 

10 

PRINT " 

INTEREST " 

20 

PRINT "YEAR 

AMOUNT BALANCE" 

30 

PRINT "- 


40 

Y = 1 




(continued on next page) 
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PROGRAM 

5.6 (continued) 

50 

READ P,I 


60 

A = P 


70 

A = A * (1 + I) ** V 


80 

90 

B = A - P 

PRINT USING;"### 

Mtli.H ######• ##";¥;B;A 

100 

Y = Y + 1 


110 

P = A 


120 

IF Y <= 5 THEN 70 


130 

DATA 1000,.10 


140 

END 



In this example, the counter, variable Y, is initial¬ 
ized in line number 30. The initial value assigned to Y is 
1 . in line number 60, variable A is initialized to the 
amount of the principal. In line 70, the interest is com¬ 
pounded. In line 80, the interest amount is calculated by 
subtracting the balance from the compounded amount. In line 
100, the Y counter is updated by adding one year to the 
counter. This counter keeps a record of how many years the 
program has run. Line 110 tests the counter. If the counter 
exceeds five (5) years, the program stops. That is, the 
program does not go back to 70 but executes statement 120, 
the END statement. 

The output of the program is: 


YEAR 

OUTPUT 5.6 

INTEREST 

AMOUNT 

BALANCE 

1 

100.00 

1100.00 

2 

231.00 

1331.00 

3 

440.00 

1771.56 

4 

822.18 

2593.74 

5 

1583.51 

4177.25 
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. . n , However, counters have many uses other than just 

PYPrn?! 3 Th° Unt ° f h ° W many times the program has been 
i. i. -I - * e counter can also be used to keep a running 

Ibll* l/v- Y V‘ For exam Pl e / it could be used to total 

ein P lo y e es in the organization, to add up 
. e ^, ° students in a course, and to find the average 
^ ers e cou rse. One can find many other uses for coun- 


For example, to find an average grade of ten students 

m^^<f°^ rS 1-'4.- 0ne haS to use cou nters. A program that re- 
quires inputting ten scores and then calculates the average 
grade for the class is as follows: 


PROGRAM 5.7 

10 T = 0 
20 T1 = 0 

30 PRINT " TYPE THE GRADE OF A STUDENT"; 

40 INPUT G 
50 T = T + 1 
60 T1 = T1 + G 
70 IF T < 10 THEN 30 
80 A1 = T1 / T 

90 PRINT "THE AVERAGE GRADE OF T STUDENTS IS »• A1 

100 END 


In this program, we need two counters: one for keeping 
a count of the number of students, and another to sum the 
grades. These two totals are needed because the average is 
calculated as: 


Average = sum of all grades / total number of students 
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As mentioned previously, to create a coun or, you 
initialize the counter first. Lines 10 and 20 are for ini¬ 
tializing variables T and Tl. After initialization, line 50 
is keeping a count of the number of students, and line 60 is 
adding up the grades as they inputted. When the value of 
variable T exceeds 10, the next statement, line 80, is 
executed. Line 80 calculates the average. 

That is, it divides Tl, the total of all grades, by T, 
by the number of students. The output of the program is 
shown below: 


OUTPUT 5.7 


TYPE THE GRADE OF A STUDENT ? 66 

TYPE THE GRADE OF A STUDENT ? 87 

TYPE THE GRADE OF A STUDENT ? 85 

TYPE THE GRADE OF A STUDENT ? 75 

TYPE THE GRADE OF A STUDENT ? 95 

TYPE THE GRADE OF A STUDENT ? 100 

TYPE THE GRADE OF A STUDENT ? 88 

TYPE THE GRADE OF A STUDENT ? 57 

TYPE THE GRADE OF A STUDENT ? <16 

TYPE THE GRADE OF A STUDENT ? 50 

THE AVERAGE GRADE OF 10 STUDENTS IS 74.9 


The IP..THEN..ELSE Statement 

Some versions of the BASIC will permit the 
IF. .THEN..ELSE statement. The general form of the statement 
is: 

Ln2 

Lnl IF relational expression THEN or ELSE 

statement 


Ln3 

or 

statement 
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The statement consists of the statement number (Lnl), 
the keyword IF followed by a relational expression, the 
keyword THEN, a statement number (Ln2) where a transfer will 
be made, or a BASIC statement. Then the keyword ELSE follows 
and either a statement number (Ln3) or a BASIC statement 
following the keyword ELSE. 

In the case of the IF..THEN..ELSE statement, the 
relational expression is evaluated. If the condition is 
true, the statement number or the BASIC statement after the 
word THEN is executed. If the condition is false, the state¬ 
ment number or the BASIC statement after the keyword ELSE is 
executed. The important difference between IF..THEN and 
IF..THEN..else: is that in the case of IF..THEN the statement 
following the IF..THEN statement is executed when the condi¬ 
tion is true. On the other hand, if the condition is false, 
the control passes to the statement number or the BASIC 
statement after the keyword ELSE. For example: 


10 IF 10 > 20 THEN A = 50 ELSE B = 50 


Iri this statement, the values 10 and 20 are compared. 
Since the condition requires that 10 be greater than 20, a 
f^lse condition, the statement that follows the word ELSE 
will be executed. That is, the variable B will be assigned 
the value of 50. However, in this example, after the value 
is assigned to B, the control is not transferred to another 
statement, but the statement following this statement will 
executed. On the other hand, in the following example the 
control will be transferred to another statement in the 
program: 


10 IF 20 > 10 THEN 50 ELSE 90 


If this statement, the condition is true, the control 
will be transferred to statement number 50, and the state¬ 
ment number 90 after the word ELSE will not be checked 
However, as shown in Table 2.1, there are many variations of 
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the IF. .THEN. . ELSE statement. That is, the rela 1 n * 1 ® x * 
pression could be of many varieties, and the key word THEN 
could be followed by an expression and the key word ELSE 
could be followed by the statement number or vice versa. For 
example, 


10 


IF A = B THEN C = 9 * 2 ELSE 90 


In this statement, the variables A and B are compared. 
If A is equal to B, the statement C = 9 * 2 will be execut¬ 
ed; otherwise, the control will be transferred o s a emen 
number 90, the statement number after the word ELSE. 

To summarize all the BASIC control statements, let us 
write a program which will use all the statements learned so 
far. 


Suppose you were to write a payroll program for hourly 
workers. Suppose, also, that your workers were paid double 
for overtime. That is, anyone working more than 48 hours a 
week will be paid overtime for the extra hours. To calculate 
a gross pay based on the hourly rate and the number of hours 
worked, we can write the following program: 


PROGRAM 5.8 

10 PRINT"TYPE THE NAME OF THE EMPLOYEE. TYPE N TO STOP"; 
20 INPUT N$ 

30 IF N$ ="N" THEN 130 

40 PRINT "TYPE THE NUMBER OF HOURS WORKED PER WEEK"; 

50 INPUT HI 

60 PRINT "TYPE THE RATE PER HOUR"; 

70 INPUT R1 

80 IF Rl>48 THEN G=(48*R1) + (Hl-48)*(R1*2) ELSE G=H1* R1 
90 PRINT "NAME "; N$ 

100 PRINT "TOTAL HOURS WORKED "; HI 

110 PRINT " TOTAL WAGES Rs."; G 

120 GO TO 10 
130 END 
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In this program, line 30 checks for a condition to 
stop the execution of the program when the programmer types 
the capital letter N. Line 80 calculates overtime, if an 

employee has worked more than 48 hours, by using the equa¬ 
tion 


G - 48 * Rl + (HI - 48) * (Rl*2) 

after the word THEN, in this equation, a worker with over- 
be P aid for the first 48 hours at his regular rate 
(48 Rl) and at the overtime rate for all the hours over 48 
hours. However, if the worker has worked for 48 hours or 
less, then the equation 


G = HI * Rl 

after the word ELSE is used. 

The output of the above program is as follows: 


OUTPUT 5.8 


TYPE THE NAME OF THE EMPLOYEE. TYPE N TO STOP ? Shah 
TYPE THE NUMBER OF HOURS WORKED PER WEEK ? 60 
TYPE THE RATE PER HOUR ? 5 
NAME Shah 

TOTAL HOURS WORKED 60 

TOTAL WAGES Rs. 360 

TYPE THE NAME OF THE EMPLOYEE. TYPE N TO STOP “> Ali Khan 
TYPE THE NUMBER OF HOURS WORKED PER WEEK ? 50 
TYPE THE RATE PER HOUR ? 6 
NAME Ali Khan 

TOTAL HOURS WORKED 50 

TOTAL WAGES Rs. 300 


(continued on next page) 
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OUTPUT 5.8 (continued) 

TYPE THE NAME OF THE EMPLOYEE. TYPE N TO STOP ? Ajeeb 
TYPE THE NUMBER OF HOURS WORKED PER WEEK ? 40 
TYPE THE RATE PER HOUR ? 5 
NAME Ajeeb 

TOTAL HOURS WORKED 40 

TOTAL WAGES Rs. 200 


TYPE THE NAME OF THE EMPLOYEE. TYPE N TO STOP ? N 


In the above output, Shah worked 60 hours this week at 
an hourly rate of Rs. 5. He will be paid for the first 48 
hours at the rate of Rs.5 per hour, a total of Rs. 240, and 
at the rate of Rs. 10 per hour for the additional 12 hours; 
a total of Rs. 120. Therefore, Shah's total wages for this 
week will be Rs. 360. However, Ajeeb will be paid a total 
of Rs. 200 for 40 hours at the rate of Rs. 5 per hour. 

The last line in the output shows that the programmer 
stopped the program by typing the capital letter N instead 
of a name. This value, N, made the condition true in state¬ 
ment 30, and the program transferred the control to state¬ 
ment 130. Line 130 is the END statement and, consequently, 
the program stopped execution. Therefore, this program is 
flexible enough to be run for as many employees as you want. 
But to stop the program, just type the capital letter N. 


IF..THEN Compound Statement 

Some programming problems require more complex logical 
expressions. For example, we may want to execute a certain 
statement if both or one of the conditions is satisfied. 
That is, to test a range of values in order to execute 
either the statement following the THEN or the one following 
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romnn^nrf t ^P es of arrangements are referred to as 

romnounrt ^r^ 100 * 13 ' . These statements require the use of 

form of th^ 6ra ° rS aS d; *- scusse d in Chapter two. The general 
form of the compound conditional is: 


Lnl IF relational 


OR 

expression relational 
• AND 


expression THEN Ln2 


... v ThlS f t ?5 ement insists of the statement number (Lnl), 
keyword IF followed by an expression, and one of the 
compound operators OR or AND, another expression followed by 
the keyword THEN and a statement number (Ln2) or a BASIC 
statement. For example, ; 


10 IF G>90 AND G<100 THEN PRINT " YOUR GRADE IS AN A" 


^ In thlS exain P le * lf the grade of a student is between 
90 and 100, the student receives an A grade (first division) 
in this course. However, these compound statements have manv 
other uses. Specifically, in the United States, every income 
earner pays an income tax at a certain tax rate dependinq 
on the income of the taxpayer. Many computer programs are 
available for preparing taxes for taxpayers. For example 
one of the statements could look like this: ' 


10 IF I>50000 AND I<100000 THEN T = I * .30 


In this statement, if the taxpayer earns somewhere 
between Rs. 50,000 and Rs. 100,000, the tax rate would be 30 
percent. That is, this taxpayer would pay 30 percent of th 
income as tax. 

On the other hand, the OR operator requires that if 
either of the conditions is true then execute the statement. 
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For example, 


10 


IF A>50 


OR M$="MALE" THEN PRINT " PERSON IS EITHER OVER 50 

YEARS OLD OR A MALE" 


In this statement, the age (A) or the sex (J®* 1 ®) ** 
checked. If the information provided shows that the person 
is over 50 years of age, the message after the word THEN 
will be printed. However, if an age of 50 or less is typed 
and the person was a female, the message will not be prin 
ed. The computer first checks the first logical relation, 
and if true then it executes the statement after the T . 
However, if the first condition is false, it then checks the 
second condition. If the second is true it then executes the 
statement after the THEN. However, if both conditions are 
false, then it executes the statement following this state 
ment. A complete list of possibilities under which the 
message will or will not be printed is shown in the follow¬ 
ing table: 


TABLE 5.2 

. IF ... OR .. THEN Condition 

Value of A Value of M$ Message 


51 

or 

over 

male or female 

will 

print 

the 

message 

51 

or 

over 

male 

will 

print 

the 

message 

51 

ot 

over 

female 

will 

print 

the 

message 

50 

or 

less 

male 

will 

print 

the 

message 

50 

or 

less 

female 

will 

not print 

message 
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each student in^d^t^rf to ^ t0 , P , rint the letter grade of 

the ten students in s class n! ” 9 an average grade of 
follows: class. The program would look as 


PROGRAM 5.9 


10 T = 0 
20 T1 = 0 

40 INPUT G TYPE ™ E GRADE 0F A STUDENT"; 

50 IF G>90 AND G<= 100 THEN PRINT " A" 

60 IF G>80 AND G<= 90 THEN PRINT " B" 

70 IF G>70 AND G<= 80 THEN PRINT " C" 

80 IF G>60 AND G<= 70 THEN PRINT " D" 

90 IF G< = 60 THEN PRINT " E" 

100 T = T + 1 
110 T1 = Tl + G 
120 IF T < 10 THEN 30 
130 A1 = T1 / T 

14 0 PRINT "THE AVERAGE GRADE OF "• T •» 
150 END 


STUDENTS IS »; A1 


As mentioned previously, to create a counter vou 
initialize the counter first. Lines 10 and 20 are still used 
for initializing variables T and Tl. After initialization 
line 100 is keeping a count of the number of students and 
line no is adding up the grades as they are inputted 'when 
the value of variable T exceeds 10, the next statement line 
140, is executed. Line 140 calculates the average. That i <= 
it divides Tl, the total of all grades, by T, by the number 
°f students. Lines 50 through 90 are determining and print 
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ing the letter grade based on the score of the student. That 
is, the grades are determined based on the following s a e. 


tart.e 5.3 


Student Score and Grade 


Score Letter Grade 


0 - 

60 

E 

61 - 

70 

D 

71 - 

80 

C 

81 - 

90 

B 

91 - 

100 

A 


Therefore, a student with a score of 95 will fall 
between the range of 90 and 100 and will be given grade A, 
and so on. The output of the program is shown below: 





OUTPUT 5.9 



TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

7 

66 

D 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

• 

87 

B 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

7 

85 

B 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

7 

75 

C 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

7 

95 

A 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

7 

100 

A 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

*? 

• 

88 

B 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

"> 

• 

57 

E 

TYPE 

THE 

’grade 

OF 

A 

STUDENT 

• 

46 

E 

TYPE 

THE 

GRADE 

OF 

A 

STUDENT 

-> 

• 

50 


E 

THE AVERAGE GRADE OF 10 STUDENTS IS 74.9 
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In the above output, when the first score of 66 is 
typed, the computer checks this value. In line 50, the 
condition is not true. That is, 66 is not between 90 and 
100. It then checks line 60. The condition is still not 
true. It checks line 70. The condition is still not true. 
But, the condition is true in line 80, and it prints the 
letter grade D. However, line 90 will also be checked re¬ 
gardless of whether the computer finds a true condition or 
not. When the second score 88 is typed, the program starts 
checking all the conditions. It is not in the range speci¬ 
fied in line 50, but line 90 is true and it prints the 
letter grade B. However, it will continue to check lines 70 
through 90 even though it found a statement with the true 
condition. 

One of the practical uses of the compound statement 
could be a schedule of loan payments. That is, we could 
always use a program which would calculate payments of a 
loan for a house, a car, or anything. As a borrower, all of 
us would like to know the amount of each monthly and how 
much of the payment goes to the principal and how much goes 
toward the interest. The following program answers these 
questions: 




PROGRAM 5.10 

10 

PRINT 

"TYPE 

THE AMOUNT OF LOAN"; 

20 

INPUT 

A1 


30 

PRINT 

"TYPE 

INTEREST RATE"; 

40 

INPUT 

R1 


50 

PRINT 

"TYPE 

NUMBER OF YEARS OF THE LOAN"; 

60 

INPUT 

Y1 


70 

B1=A1 



80 

F = 0 



90 

1 = 1 



100 

Yl= Y1 

* 12 





(continued on next page) 
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PROGRAM 5.10 (continued) 

110 R1=R1/100 

120 F=F+(1/((1+(R1/12))**I)) 

130 1=1+1 

140 IF KYI THEN 120 
150 A = Bl/F 
160 PRINT 

170 PRINT "YOUR MONTHLY PAYMENT IS ";A 
180 PRINT 

190 PRINT "DO YOU WANT TO LIST MONTHLY PAYMENTS ; 

200 INPUT H$ 

210 IF H$="NO" THEN 380 

220 PRINT "HOW MANY YEARS DO YOU WANT TO PRINT ; 
230 INPUT HI 
240 H1=H1*12 
250 1=1 


260 PRINT 
270 PRINT 
280 PRINT 
290 PRINT 


BEG. 

BALANCE INTEREST 
300 C = B1*R1/12 
310 PRINT USING "£####!#.## 

#####.##";Bl;C;(A-C);A;(Bl-(A-C)) 

320 B1 = B1 - (A-C) 

330 1=1+1 

340 IF KHl THEN 300 
350 END 


MONTHLY PAYMENT SCHEDULE" 

ENDING" 
BALANCE" 


PRINCIPAL AMOUNT 


####.## #####•## 


In the above program, line 120 calculates the payment 
factor by using the following equation: 


Factor 


Factor +1/(1+ (interest rate/ 12)) ** month 
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Line 150 calculates the monthly payment by 
ing equation: 1 


using the 


follow- 


Monthly payment = Loan amount / Factor 


1nri,irf T inn S calcuiates the amount one has to pay each month 
including interest to pay the loan over the life of the 
loan. The output of the program is as follows: 



OUTPUT 



TYPE THE 

LOAN AMOUNT 

? 1000 



TYPE INTEREST RATE ? 

10 



TYPE THE 

NUMBER OF YEARS OF THE 

LOAN? 1 


YOUR MONTHLY PAYMENT 

IS : 95.52 



DO YOU WANT TO LIST MONTHLY PAYMENTS? YES 

HOW MANY 

YEARS YOU WANT TO PRINT 

? 1 



MONTHLY 

PAYMENT SCHEDULE 


BEG. 




ENDING 

BALANCE 

INTEREST 

PRINCIPAL 

AMOUNT 

BALANCE 

1000.00 

8 .33 

87.18 

95.52 

912.82 

912.82 

7.61 

87.91 

95.52 

824.91 

824.91 

6.87 

88.64 

95.52 

736.26 

736.26 

6.14 

89.38 

95.52 

646.88 

646.88 

5.39 

90.13 

95.52 

556.75 

556.75 

4.64 

90.88 

95.52 

465.88 

456.88 

3.88 

91.64 

95.52 

374.24 

374.24 

3.12 

92.40 

95.52 

281.84 

281.84 

3.25 

93.17 

95.52 

188.67 

188.67 

1.57 

93.95 

95.25 

94.73 

94.73 

0.79 

94.73 

95.52 

0.00 
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As you can see in the output, one has to pay Rs. 95.52 
per month which includes interest and principal. The princi¬ 
pal amount reduces the loan each month. Each month the 
interest decreases and the amount of payment towards the 
principal increases. During this period, enough payments are 
made to cover the Rs. 1000 loan as well as interest on the 
loan. 
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QUESTIONS 

1. Correct errors, if any, in the following program segments: 


a) 

20 

GOTO 100 


30 

PRINT 

"NAME" 


40 

END 


b) 

20 

GO TO 

20 


30 

PRINT 

"NAME" 


40 

END 


c) 

20 

GO TO 

PRINT 


30 

PRINT 

"NAME" 


40 

END 


d) 

20 

GO TO 

40 


30 

PRINT 

"NAME" 


40 

END 



2. What is an abnormal termination of a program? When 

would abnormal termination occur. 

3. What is structured programming? Discuss the advantages 
of structured programming. 

4. Print the output of the following program segments: 


a) 


b) 


10 A = 10 

20 IF 10 = A THEN PRINT "A IS EQUAL TO 10" 
30 A = 20 
40 GO TO 10 

10 A = 10 

20 IF 10 = A THEN PRINT A 
30 GO TO 60 
40 A = 30 

50 IF A = 40 THEN PRINT A 
60 END 
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5. What is a sentinel record? When would you use 
record? 

6 . What is a counter and what is it used for? 

7. Show the output of the following program segments: 


this 


10 

A = 0 




20 

A = A 

+ 1 



30 

PRINT 

A 



40 

IF A = 

■ 10 

THEN 

END 

50 

GO TO 

20 



10 

C = 0 




20 

C = C 

+ 2 



30 

PRINT 

C 



40 

C = C 

+ 1 



50 

IF C = 

= 40 

THEN 

END 

60 

GO TO 

20 




8 . Write a program that reads and prints grades, one for 
each student, of ten students and calculates the 
average grade for the class. 

Write a program that accepts the salesperson's name and 
the amount sold and prints the name, the amount sold, 
and the commission paid to the salesperson based on the 
following table: 

AMOUNT SOLD COMMISSION RATE 


0 - 1000 0 % 

1001 - 5000 2 % 

5001 - 10000 5 % 

10001 - 20000 10 % 

20000 and above 15 % 
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10 on a P rof ? r / 1,n that determi nes overdue accounts based 

the following table of a company's account receivables: 


DAYS LATE MESSAGE 


0-30 
31 - 60 

60 - 120 
120 - 150 
150 and over 


None 

Overdue 30 days 

Overdue 60 days, you must pay promptly 
Overdue, you must pay within 10 days. 
Delinquent. Take legal action. 


11. Write a program that converts and prints the followina 

covertsh" Ir P . ahrenhe * t (F) P mto Cels^s Tnd 9 
coverts them back into Fahrenheit. The equation for 

converting Fahrenheit into Celsius is: 


C = 5/9 x (F - 32) 
Temperatures 


60, 80, 90, 100, 105, 110, 120, 66, 55, 88, 75 

12. Write a program that prints numbers between 10 and 20 
inclusive. You must use counter and must not read or 
input the numbers into the program. 

13. Write a program that reads the height and weight of a 
man and determines whether he is overweight under¬ 
weight, or average weight. Use the following table- 


Height 



Average Weight 

5' 

- 

1” 

128 

- 134 

5' 

— 

2" 

134 

- 140 

5' 

- 

3" 

140 

- 144 

5' 

- 

4" 

143 

- 149 

5' 

— 

5" 

147 

- 153 

5' 

- 

6” 

152 

- 158 

5* 

- 

7 " 

156 

- 163 

5' 

- 

8" 

161 

- 167 

5' 

— 

9" 

166 

- 172 

5' 

- 

10” 

171 

- 176 
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5' - 11" 

175 

- 181 

6 ' - 0" 

181 

- 186 

6 ' - 1" 

186 

- 191 

6 ' - 2" 

191 

- 196 

6 ' - 3" 

197 

- 200 


14. Write a program that reads the sex and grade of each 
student and prints the grade and the sex of the stu¬ 
dent. (Hint: you can code the sex of a student when 
inputting it into the program. For example, female 
could be coded as 1 and male could be coded as 0.) 

15. Write a program that reads the wages of employees and 
deducts income tax based on the following table. 


Wages Tax Rate 

Rs. 0 - 10000 0 % 

10001 - 20000 5 % 

20001 - 30000 7 % 

30001 - 50000 9 % 

50001 - 90000 15 % 

90001 - 150000 20 % 

150000 and over 30 % 


16. The population of Pakistan was reported to be 
100,000,000 in 1988, and was growing at the rate of 
3.25 percent per year. Write a program that will 
project the population into the year 2020. However, if 
the population exceeds 120,000,000 in the year 2000, 
use a 2.00 percent growth rate from there on. 
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STRUCTURED PROGRAMMING : FOR - NEXT STATEMENT 


FOR...NEXT LOOP 

So far we have seen several different patterns of 
oops. n all patterns a condition is checked against the 
specified value to end the loop. The loop is terminated if 
cne condition is satisfied. In some cases, the conditional 
statement is placed in the beginning of the loop, called 
pretest loop, in other cases, the conditional statement is 
placed at the end of the loop, called posttest loop. All 
the loops were discussed in the context of IF ... THEN or 
GOTO statements. However, a loop may have other loops within 
it, ca_led nested loops. That is, loop may have been nested 
in another processing looping such as another IF...THEN or 
GOTO loop. When there is a loop within a loop, the most 
encompassing loop is called the outer loop and the loop 
which is inside this loop is referred to as the inner loop, 
m such a set up, the inner loop is executed repeatedly as 
siany times as required by the inner loop each time the outer 
loop is executed. The concept of nested loop is applicable 
in all looping techniques. However, it is more appropriate 
in the context of the FOR ... NEXT loop. For example in 
Program 5.6, the counter Y was initialized in line^o 
incremented in line 100, and tested in line 120. Because of 
the importance of the counting loop and nested loop BASIC 
has provided the FOR ... NEXT statements for the ciuntina 
loop as a control. y 
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The general form of the FOR ... NEXT is as follows: 

number number number 

Lnl FOR varnamel = or TO or STEP or 

varname2 varname3 varname4 

^Increment value 

->Limit value 

l—->Initial value 

->Control variable 

BASIC Statements to be repeated 


Ln2 NEXT varnamel 

In a program, the two statements FOR and NEXT must appear 
together and Lnl comes first in the seguence of statement num¬ 
bers. That is, the FOR statement must come before the NEXT state¬ 
ment, and each FOR must have a corresponding NEXT. A FOR loop 
begins with a FOR statement, contains any number of BASIC state¬ 
ments, and ends with a NEXT statement. The varnamel, a numeric 
variable, called an index or loop counter, must be the same in 
both statements. In the FOR statement, after the egual sign, 
there could be three numeric constants or three numeric variables 
that are previously defined in the program outside of the FOR ... 
NEXT statements. However, the STEP and the varname4 or constant 
after the STEP are not required, if the value is 1. The three 
numbers or variables represent the initial value, the test value, 
and the step or increment in that order. They determine the 
number of times a loop is executed. 

As an example: 


PROGRAM 6.1 


10 FOR I = 1 TO 10 STEP 1 
20 PRINT I; 

30 NEXT I 
4 0 END 
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in the above program, the FOR statement is in line 
number 10. After the line number, the word FOP starts the 

SptS. eme *. nt V Th ° indox variable i3 X which is the same for the 
NEXT statement in line number 30. When the FOR ... NEXT 
starts at line 10, the index I is initialized to 1, because 
the vaiue after the equal sign equals 1. The statements 
wi in the loop, lines 20 through 30, are executed v/ithout 
testing the limit value of the loop. Therefore, the next 
statement number 20, PRINT I, is executed. That is, it 
prints the number 1, the initial value of I. Then it goes to 
statement number 30, the NEXT statement. The NEXT statement 
indicates the end of the loop. Upon execution of the NEXT 
statement, the loop goes on back to statement number 10, the 
FOR statement. Since it is the second time the FOR statement 
is executed, the value of the variable I is incremented by 
1, the value next to the STEP. Now the value of the variable 
I is 2. The value of the variable I is tested against the 
limit value, 10. Since the index is less than the limit 
value, the loop is repeated. That is, the value of I is 
printed as 2. Each time the loop is executed, I is increased 
by 1 and tested with the limit value until the value of I 
exceeds the limit value, 10. Then the computer stops repeat¬ 
ing the loop and goes on to the statement after the NEXT 
statement, the END statement in this program. This loop will 
be executed 10 times. That is, the PRINT statement will 
print values from 1 to 10. The output of the program would 
look as follows: 


OUTPUT 6.1 

123456739 10 
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Let us consider another example: 



PROGRAM 

6.2 


10 

FOR I = 

1 TO 10 STEP 

5 

20 


PRINT I; 


30 

NEXT I 



40 

END 




In this example, the value after the STEP is now 5. 
The program will initial the I to 1. The PRINT statement 
will print the number 1 as the value of I. The second time, 
the value of I will be increased by 5. The value of I will 
now be 6. The PRINT statement will print 6. The third time, 
the value of I will be increased by 5. The I will become 11. 
Since the value of I is greater than the limit value, the 
loop will not be executed. The computer will go on to state¬ 
ment number 40, the END statement and the program will stop. 
The output of the program is as follow: 


1 6 


OUTPUT 6.2 


If the increment is 1, the STEP is not needed. In a 
case where a STEP is not specified, the computer automati- 
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autoIaUc^inrrf 5 index b Y 1, a default value. This 
fhat the rn^nnf P rocedur e is called default. It means 
• f t J -3 programmed to perform some activities 

6 1 statement 1 ?^ by ^ P ro< 3 rammer - Therefore, in Program 
6 .1, statement 10 could be written as: 


10 


FOR I = 


TO 


10 


* n th . is statement, the STEP is not specified. The 
computer will use the default procedure to increment the 
value of I by 1. 

Further, the initial value of an index, the limit 
value, and the increment value could be any value. That is 
they could be negative, zero (except the increment value 
should not be zero) or positive. For example: 


10 FOR 1 = 5 TO 10 

In this statement, the index is initialized to 5 
incremented by 1, a default value because the STEP component 
is not specified, and the limit value is 10. Output of this 
statement is: 

5 6 7 8 9 10 


The FOR ... NEXT values could be fractional. For example: 


10 FOR I = .01 TO 1 STEP .1 

In this statement, the index is initialized to .01 
incremented by .1, and the limit value is 1. The output of 
this statement is as follows: 


•01 .11 .21 .31 .41 .51 .61 .71 .81 .91 
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The FOR ... NEXT statements could be used to count 
backwards. For example: 


10 FOR I = 10 TO 1 STEP -1 


Notice that in the backward count, the initial value 
is a larger number that the limit value, and the increment 
value is always negative. The output of this statement is: 

10 987654321 

Besides constants, variables could also be used. For 
example. 


PROGRAM 6.3 


10 

K = 1 


20 

M = 10 


30 

FOR I = 

K TO M 

40 


PRINT 

50 

NEXT I 


60 

END 



In this example, the initial variable K and the limit 
variable M are defined in statements numbered 10 and 20 
respectively. The FOR statement consists of variable names 
instead of constants. 
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^ T - m oH I Kw a , dd - lti ° n to usin< 3 variables, expression can 
form d by using variables and/or constants. For example, 


be 




PROGRAM 6.4 

10 

K = 1 


20 

M = 10 


30 

FOR I = 

K TO M*2 STEP M/2 

40 


PRINT I; 

50 

NEXT I 


60 

END 



In this example, the initial variable K and the limit 
variable M are defined in statements numbered 10 and 20 
respectively. The FOR statement consists of expressions M*2 
and M/2. This means that the I will be initialed to 1 
incremented by 5 (M/2 = 10/2), and tested with the limit 
value of 20 (M*2 = 10*2). 


However, 
watch for. 


there are some conditions which you should 


A STEP value which puts the index beyond the limit 
value after the first execution of the loop does not servp 
any function. For example, F noz serve 


10 FOR I = 1 TO 10 STEP 10 


In this statement, the loop 
once. The second time, the index 
equals ll which is greater than 10. 
This loop is executed only once; 
serve any purpose. 


will be executed only 
is incremented by lo, I 
The loop is terminated, 
therefore, it does not 
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Also, one mU st be cautious -bout branch ing 

loop from outside of the loop. Th ' f the i OOD 

never to branch into the loop from outside of the loop 

without executing the FOR statement firs 



PROGRAM 6 

.5 

10 

20 

GO TO 50 

PRINT " EXAMPLE WITH 

INVALID USE OF FOR ... NEXT" 

30 

K = 10 


40 

FOR I = 1 TO K 


50 

PRINT I; 


60 

NEXT I 


70 

END 



In this example, statement number 10, GOTO 50, goes to 
statement number 50, which is inside the FOR ... NEXT loop. 
Since the program never executed line 40, the FOR statement, 
the computer will assume that there is no FOR statement in 
the program. An error message will be issued. 

However, it is permissible to branch out of the 
FOR . . • NEXT loop. But once out of the loop, you can reenter 
only* by executing the FOR statement first. That is, to 
execute the FOR ... NEXT loop, you must execute the FOR 
statement first. 
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Other examples of errors are 


TABLE 6.1 

EXAMPLE OF FOR ... NEXT ERROR 


BASIC Statement 


10 

20 

FOR 1=1 
1=1 

TO 

10 

30 

NEXT I 



10 

FOR J = 1 

TO 

1 

40 

NEXT J 



10 

FOR J = 1 

TO 

10 

40 

• 

NEXT A 



10 

FOR R = 10 

TO 

1 


40 NEXT R 


Valid/Invalid 

Reason 

Invalid 

The index variable 

I is redefined within 
the FOR ... NEXT loop 

Valid 

Redundant use of 
for ... next. It will 
execute the loop once. 

Invalid 

The index variable A 
in the NEXT statement 
does not match the inc 
variable J in the FOR 
statement. 

Invalid 

The increment value 
must be specified 
in a backward count 


10 FOR R = i TO 10 Invalid 

60 END 


The NEXT statement 
is missing. The prograi 
will issue an error 
message: FOR without 
NEXT in line 10. 


10 K = i 
40 NEXT R 


Invalid 


The FOR statement 
is missing. The progre 
will issue an error 
message: NEXT without 
FOR in line 40. 
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Keep in mind that when the 
can be used later in the program, 
other variables in the program, 
fined during the execution of 
the other parts of the program. 


value of I is defined, it 
That is, the index is like 
once defined it stays de- 
the program unless changed in 
For example: 



In this program 
by statement number 4 
number 50. The output 


he value of I will be 11 when printed 
and then changed to 1 by statement 
,f the program is as follows: 



OUTPUT 6.3 


THE 

THE 

CURRENT VALUE OF I IS 
NEW VALUE OF I IS 1 

11 
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used t^qtnerat^nnih 1 " 9 ^ l0 ° P ' the F0R *'• NEXT can bo 
a r a m that- oon *. mb ers. For example, let us write a pro¬ 
gram that generates even numbers: F 


PROGRAM 6.7 

In pdtmt I! E0LL0WING IS THE LIST OF EVEN NUMBERS" 
20 PRINT BETWEEN 1 TO 50." 

30 FOR J = 2 TO 50 STEP 2 
40 PRINT J; 

50 NEXT J 
60 END 



This program generates a list of the following even 
numbers between 1 and 50. g en 
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With the FOR ... NEXT statements, we can generate 
numbers and use those numbers for other purpose. For exam- 
pie, the following program calculates the squares of odd 
numbers between 1 and 10: 



PROGRAM 

6.8 

10 

PRINT " FOLLOWING 

IS A .LIST OF ODD NUMBERS" 

20 

PRINT " BETWEEN 1 

TO 10 AND THEIR SQUARES." 

30 

PRINT "NUMBER 

SQUARE " 

40 

PRINT "- 


50 

FOR J = 1 TO 10 

STEP 2 

60 

PRINT J;" 

" ; J*J 

70 

NEXT J 


80 

END 



This program generates a list of the following odd 
numbers between 1 to 10, and their squares. 
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The implementation of the counting loop is simplified 
by the FOR ... NEXT statements. In some cases, the FOR ... 
NEXT statement shortens the program. That is, it takes 
fewer programming statements to write the same program as in 
the IF..THEN. For example, Program 5.6 would look as follows 
with the FOR...NEXT statements: 




PROGRAM 6.9 

10 

PRINT " 

INTEREST " 

20 

PRINT "YEAR 

AMOUNT BALANCE" 

30 

PRINT "- 


40 

FOR Y = 1 

TO 5 

50 

READ P,I 


60 

A = P 


70 

A = A * (1 + 

I) ** Y 

80 

B = A - P 


90 

PRINT USING;" 

### #####.## ######.##",* Y;B;A 

100 

P = A 


110 

NEXT Y 


120 

DATA 1000,.10 


130 

END 



In this program, one leSs statement is needed than in 
Program 5.6. 
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In addition, Program 5.7, the grade program, could be 
rewritten as follows: 




PROGRAM 6.10 

10 

T1 = 0 


20 

FOR T = 1 

TO 10 

30 

PRINT " TYPE 

THE GRADE OF A STUDENT"; 

40 

INPUT G 


50 

T1 = T1 + G 


60 

NEXT T 


70 

A1 = T1 / (T 

- 1) 

80 

PRINT "THE AVERAGE GRADE OF (T-l);" STUDEN1S lb ; A1 

90 

END 



In this program, we now need one counter for summing 
the grades. The index, T , provides for the total number of 
students. However, when the index is terminated, the value 
of the index will be 11. Therefore, we need to subtract 1 
from T to make the index equal to 10. Statements 70 and 80 
were changed to adjust the index before dividing the grade 
total by the student's total and printing the student s 

total. 

The output of the program will look as follows: 


OUTPUT 6.6 

TYPE THE GRADE OF A STUDENT ? 66 

TYPE THE GRADE OF A STUDENT ? 87 

TYPE THE GRADE OF A STUDENT ? 85 

TYPE THE GRADE OF A STUDENT ? 75 

TYPE THE GRADE OF A STUDENT ? 95 

TYPE THE GRADE OF A STUDENT ? 100 

TYPE THE GRADE OF A STUDENT ? 88 

TYPE THE GRADE OF A STUDENT ? 57 

TYPE THE GRADE OF A STUDENT ? 46 

TYPE THE GRADE OF A STUDENT ? 50 

THE AVERAGE GRADE OF 10 STUDENTS IS 74.9 
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As discussed in chapter 5, one of the practical 
examples of the compound statement could be a schedule of 
loan payments. That is, we could always use a program which 
would calculate payment of a loan for a house, a car, or 
anything. As borrowers, all of us would like to know the 
amount of our monthly payments and how much of the payments 
go to principal and how much towards interest. The following 
modified program answers the same guestions as in Program 
5.10: 


PROGRAM 6.11 

10 PRINT "TYPE THE AMOUNT OF LOAN"; 

20 INPUT A1 

30 PRINT "TYPE INTEREST RATE"; 

40 INPUT R1 

50 PRINT "TYPE NUMBER OF YEARS OF THE LOAN"; 

60 INPUT Y1 
70 B1=A1 
8 0 F = 0 
90 Yl= Y1 * 12 
100 R1=R1/100 
110 FOR I = 1 TO Y1 
120 F=F+(l/((1+(R1/12))**I) ) 

130 NEXT I 
140 A = Bl/F 
150 PRINT 

160 PRINT "YOUR MONTHLY PAYMENT IS ";A 
170 PRINT 

180 PRINT "DO YOU WANT TO LIST MONTHLY PAYMENTS"; 

190 INPUT H$ 

200 IF H$="NO" THEN 380 

210 PRINT "HOW MANY YEARS DO YOU WANT TO PRINT"; 
220 INPUT HI 
230 H1=H1*12 

(continued on next page) 
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PROGRAM 6.11 (continued) 

240 PRINT 

250 PRINT " MONTHLY PAYMENT SCHEDULE" 

260 PRINT " BEG. ENDING" 

270 PRINT n BALANCE INTEREST PRINCIPAL AMOUNT BALANCE" 
280 FOR 1=1 TO HI 
290 C = B1*R1/12 

300 PRINT USING ## ####.## ####•## #####■## 

ff #**.##”;Bl;C;(A-C);A;(Bl-(A-C)) 

310 B1 = B1 — (A-C) 

320 NEXT I 
330 END 


In the above program, the counter I was replaced by 
the FOR_NEXT statement. Now, we have two fewer state¬ 
ments than in Program 5.10. The output of the program will 
not be affected. The output is as follows: 


OUTPUT 6.7 


TYPE THE LOAN AMOUNT ? 1000 
TYPE INTEREST RATE ? 10 

TYPE THE NUMBER OF YEARS OF THE LOAN? 1 

YOUR MONTHLY PAYMENT IS : 87.92 

DO YOU WANT TO LIST MONTHLY PAYMENTS? YES 
HOW MANY YEARS YOU WANT TO PRINT ? 1 

(continued on next page) 
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As you can see, there is no change in the output. 


NESTED LOOP - FOR...NEXT STATEMENTS 

The FOR...NEXT statements can also be used to create a 
nested loop. For example, 
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In this program, the FOR...NEXT loop in lines 30 
through 50 is nested within the FOR ... NEXT 1°°P in lines 
20 and 60. Nesting loops require that each FOR statement 
must have a matching NEXT statement. Further, the paired 
FOR . . . NEXT statements should have the same control varia¬ 
bles. In our program, the paired FOR..NEXT statements in 
lines 30 and 50 have the variable J as the control varia¬ 
ble, and the paired FOR ... NEXT statements in 20 and 60 
have the variable I as the control variable. The inner loop 
is always paired first before the outer loop and the inner 
loops are executed first before the outer loop. In the 
nested loop, the outer loop is initialized and executed 
first. The program continues and sees the inner loop. The 
loop is initialized and executed as many times as specified 
by the limit value, three times in our example. Then the 
program goes on to the next statement, the NEXT statement. 
Since it is a part of the outer loop, the program goes on to 
line 20, the FOR statement. The I variable is incremented to 
2 and the next statement is executed, the FOR statement in 
line 30. Since the FOR statement was executed from the 
preceding statement in the program, the J is again initial¬ 
ized to 1, and the inner loop starts over. The inner loop 
will be executed as many times as specified in the limit 
value. After executing the inner loop, the NEXT statement 
following the inner loop will be executed. The loop then 
returns to the FOR statement. The value of I is incremented 
by 1. This time the value of I is greater than the limit 
value, and the execution of the outer loop stops. The 
output of the program would look as follows: 


OUTPUT 6.8 

I J 

1 1 
1 2 

1 3 

2 1 

2 2 
2 3 
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The above output will help in understanding how the 
nested loops work. First the FOR statement in line 20 is 
executed. At this time, the value of I is initialized to 1. 
Then the inner loop is found and initialized to 1. The PRINT 
statement prints 1 for both control variables I and J. Since 
the inner loop is executed first, the value of I is fixed at 
1 while the value of J changes. After the inner loop is 
executed three times, the limit value, the computer goes on 
to the next statement, line 60. This line is the NEXT state¬ 
ment paired with the FOR statement in line 20. The computer 
goes back to line 20 and increments the value of I by 1. The 
value of I is now 2. The execution continues with the 
execution of the FOR statement in line 30, executing the 
inner loop 3 times. The PRINT statement will print three 
lines of output again with I fixed at 2 this time. After the 
inner loop is executed, the process continues until the 
control variable of the outer loop exceeds its limit value. 


Let us take an example with three nested loops: 



PROGRAM 

6.13 

10 

PRINT " I 

J K" 

20 

FOR 1=1 

TO 2 

30 

FOR J = 1 

TO 3 

40 

FOR K 

= 1 TO 4 

50 

PRINT I;" 

" ; J;" " ;K 

60 

NEXT K 


70 

NEXT J 


80 

NEXT I 


90 

END 



In this program there are three loops: statements 40 
and 60, 30 and 70, and 20 and 80. All these are matching 
FOR...NEXT statements. The FOR...NEXT with control variables 
K is the inner loop, the one with J is the outer of this 
loop, and the one with I is the extreme outer loop. The 
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output of the program is as follows: 


1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


OUTPUT 6.9 


J K 


1 

1 

1 

1 

2 

2 

2 

2 

3 

3 

3 

3 

1 

1 

1 

1 

2 

2 

2 

2 

3 

3 

3 

3 


1 

2 

3 

4 
1 
2 

3 

4 
1 
2 

3 

4 
1 
2 

3 

4 
1 
2 

3 

4 
1 
2 

3 

4 


In this output, the innermost loop, the one with the 
control variable K, is executed six times. The loop with the 
control variable J is executed twice, and the loop with the 
control variable I is executed twice. 
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In order to determine how many times the nested loop 
will be executed, multiply the limit values of all the 
FOR...NEXT statements. In our example, the nested loop will 
be executed 24 times (2x3x4). 

There is no limit to the number of level loops that 
can be nested, as long as they do not cross (overlap) each 
other. Examples of valid or invalid loops could be: 


TABLE 6.2 


EXAMPLES OF VALID AND INVALID NESTED LOOPS 


VALID 


INVALID 


FOR 

I = 

1 

TO 

5 

FOR 

I 

= 

1 

TO 

5 

FOR 

J = 

• • • 

1 

TO 

10 

FOR 

J 

• • 

• 

1 

TO 

10 

NEXT 

• • • 

J 




NEXT 

• • 

I 

• 




NEXT 

J 




NEXT 

J 





FOR 

I = 

1 

TO 

5 

FOR 

I 

= 

1 

TO 

5 

FOR 

J = 

1 

TO 

10 

FOR 

J 

= 

1 

TO 

10 

FOR 

K = 

• • • 

1 

TO 

5 

FOR 

K 

• • • 

1 

TO 

5 

NEXT 

• • • 

K 




NEXT 

J 

• • • 




NEXT 

J 




NEXT 

K 





NEXT 

I 




NEXT 

I 
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One of the practical example of nested loops is creat¬ 
ing a table with row and column labels. For example, 


PROGRAM 6.14 


10 

PRINT " 


20 

PRINT 


30 

FOR 1=1 

TO 8 

40 

PRINT " 

II • T • 

/ -L 9 

50 

NEXT I 


60 

PRINT 


80 

FOR 1=1 

TO 9 

90 

FOR K = 1 

TO 8 

100 

PRINT 

II • 

9 

110 

NEXT K 


120 

PRINT 


130 

PRINT I; 


140 

FOR J = 

1 TO 8 

150 

PRINT " 

II • 

9 

160 

NEXT J 


170 

PRINT 


180 

NEXT I 


190 

END 



TABLE 1" 
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The output of the above program is: 


OUTPUT 6.11 

TABLE 1 


12345678 


l__l 
2 I 


3 


4 


5 


6 


7 


8 


This matrix table is printed by the Program 6.14. By 
understanding the nested loops, one can find many useful 
applications for them. Some of the uses will be discussed in 

the next chapter. 

Let us modify the Grade program to allow for three 
examination grades for each student and print the average 
grade for each student and the average grade for the class. 
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For example: 



PROGRAM 6.15 


10 

T1 = 0 


20 

FOR I = 1 TO 10 

1 

30 

PRINT " TYPE THREE EXAMINATION GRADES FOR 

EACH STUDENT" 

40 

T = 0 

i 

50 

FOR K = 1 TO 3 

j 

60 

INPUT G 


70 

T = T + G 

J 

80 

NEXT K 


90 

A2 = T / 3 

|| 

100 

PRINT " AVERAGE GRADE OF THIS STUDENT IS " 

; A2 

110 

T1 = T1 + A2 

1 

120 

NEXT I 


130 

A1 = T1 / (1-1) 


140 

PRINT" THE AVERAGE GRADE OF THE"; (1-1)"; 

STUDENTS IS All 

150 

END 

Jj 


In this program, we now need one counter for summing 
the gr^de of each student and one counter for the whole 
class. The index I provides the total number of students, 
and counters T and T1 are used for summing grades. In addi¬ 
tion, we need two loops. One to sum and enter three grades 
for each student and one to enter grades for ten students. 
In the latter case, when the index is terminated, the value 
of the index will be 11. Therefore, we need to subtract 1 
from I to make the index equal to 10. Statements 130 and 140 
were changed to adjust the index before dividing the grade 
total by the student's total, and printing the students 
total. 
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The output of the program will look as follows: 


OUTPUT 6.11 


? TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 

? 80 
? 90 

AVERAGE GRADE OF THE STUDENT IS 76.6666 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
. 50 

? 60 
? 60 

AVERAGE GRADE OF THE STUDENT IS 56.6666 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 90 
? 95 
? 98 

AVERAGE GRADE OF THE STUDENT IS 94.3333 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 88 
? 87 
? 81 

AVERAGE GRADE OF THE STUDENT IS 85.3333 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 76 
? 76 
? 77 

AVERAGE GRADE OF THE STUDENT IS 76.3333 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 89 
? 95 
? 77 

(continued on the next page) 
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AVERAGE GRADE OF THE STUDENT IS 87 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 45 
? 65 
? 55 

AVERAGE GRADE OF THE STUDENT IS 55 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 


? 66 
? 80 
? 86 

AVERAGE GRADE OF THE STUDENT IS 77.3 3 33 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 

? 90 
? 80 
? 88 


AVERAGE GRADE OF THE STUDENT IS 8 6 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 


? 50 
? 50 
? 40 

AVERAGE GRADE OF THE 
THE AVERAGE GRADE OF 


STUDENT IS 46.6666 
10 STUDENTS IS 


74.1333 
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QUESTIONS 

1. Define pretest, posttest, and nested loops. 

2. What does an index do in the FOR... NEXT loop? 

3 ' rof ,y? U iEx? a ^op? if the STEP value were not used in the 


4. 


Wrl J" e t § rogram that reac * s and prints grades, 
eaoh student, of ten students and calculates th 
grade for the class. 


one for 
e average 


5. Write a program that prints numbers between 10 and 20 
inclusive. You must use counter and must not read or 
input the numbers into the program. 

6. Write a program that reads the height and weight of a 
man and determines whether he is overweight, underweight 
or average weight. Use the Do loop to generate the fol¬ 
lowing table values. 


Height Average Weight 


5 ' 

- 

1" 

128 

- 

134 

5* 

— 

2" 

134 

- 

140 

5' 

— 

3" 

140 

- 

144 

5' 

- 

4" 

143 

- 

149 

5' 

— 

5" 

147 

- 

153 

5' 

- 

6" 

152 

- 

158 

5' 

- 

7" 

156 

- 

163 

5' 

- 

8" 

161 

- 

167 

5' 

- 

9" 

166 

- 

172 

5' 

- 

10" 

171 

- 

176 

5 1 

- 

11" 

175 

- 

181 

6' 

- 

0" 

181 

- 

186 

6' 

- 

1" 

186 

- 

191 

6' 

- 

2" 

191 

- 

196 

6 ' 

- 

3" 

197 

- 

200 
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Write a program that reads the sex and grade of each 
student and prints the grade and the sex of the stu¬ 
dent. (Hint: you can code the sex of a student when 
inputting it into the program. For example, female 
could be coded as 1 and male could be coded as 0.). Use 
DO 1 loop. 

Write a program that reads the wages of employees and 
deducts income tax based on the following table. Use 
the Do loop to create the table. 


Wages 



Tax Rate 

/ 

0 

— 

10000 

0 % 

10001 

- 

20000 

2 % 

20001 

- 

30000 

4 % 

30001 

- 

40000 

6 % 

40001 

- 

50000 

8 % 

60001 

- 

70000 

10 % 

80000 

- 

90000 

12 % 

100000 

and 

over 

14 % 


Write a FOR...NEXT loop that prints the numbers 20, 18, 

16,..., 0 in a column. 

Show the number of lines and the values that will be 
printed by each of the following program segments. 

a) FOR I = 1 TO 5 
PRINT I 

NEXT I 

b) FOR I = 1 TO 20 STEP 5 
PRINT I 

NEXT I 

C) FOR I = 1 TO 10 STEP 10 
PRINT I 
NEXT I 


154 


Scanned by CamScanner 



Chapter 6 


d) FOR J - 1 TO 2 
FOR K - 1 TO 3 
PRTNT J,K 
NR XT K 
NEXT J 

o) FOR L - 10 TO 0 STEP -2 
PRINT L 
NEXT L 


11. Correct errors, if any, in the following program segments: 

a) FOR I - 10 TO 30 STEP -1 
PRINT I 

NEXT I 

b) FOR J - 1 TO 10 
PRINT J 

NEXT I 

d) FOR I = 10 TO 0 STEP 2 
PRINT I 

NEXT I 

e) FOR J = 1 TO 10 
J =■ 1 

PRINT J 
NEXT J 

C) FOR L = 1 TO 10 
FOR K = 1 TO 2 
FOR J = 1 TO 3 
PRINT L,K, J 
NEXT J 
NEXT L 
NEXT K 

12. Write a program that prints two columns of numbers. The 
first column should have the numbers between 10 and* 20 
and the second column between 40 and 60. 
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13. Write a program that will read the following table of 
numbers and will print the average of each row and each 
column. 


10 

20 

44 

45 

50 

80 

90 

50 

60 

30 

66 

43 

25 

29 

40 

60 

40 

50 

60 

40 

30 

20 

34 

43 

35 

99 

20 

39 

50 

60 

77 

88 


14. A factorial of a number is calculated as follows: 
n! =3! =3x2xl=6 

Write a program that calculates a factorial of any number. 
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ARRAY AND MATRIX - DIMENSION STATEMENT 


INTRODUCTION 

So far we inputted or read numbers. Most often a 
number was stored temporarily in the computer memory under a 
variable name and was replaced with another number. However, 
it is necessary to store and process a large amount of data. 
For example, to calculate an average and a variance of five 
numbers will require creating five separate variable names 
and accessing each one individually. Let us create a program 
to calculate the average and the variance of the following 
five numbers: 


50, 70, 85, 99, and 65. 


The equations for calculating an average and a variance are: 


1) Y 

i.e. Y 


E Y sum of Y's 

n number of numbers 

50 + 70 + 85 + 99 + 65 

5 


= average 


369 

- = 73.8 

5 
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2) a 


Z ( Y - Y ) 


= variance 


n - 1 


2 2 2 2 2 
(50-73.8) + (70-73.8) + (85-73.8) + (99-73.8) + (65-73.8) 

-- 354 

4 


Equation 1 could be calculated without storing each 
number in separate memory (variable name). But equation 2 
requires that we calculate the average first and then sub¬ 
tract the average from each number and square the differ¬ 
ence. That means that either we reread the number again or 
store each one in a memory and access it later on. For 
example, the following program calculates both the average 
and the variance: 


PROGRAM 7.1 


10 READ Jl,J2,J3,J4,J5 

20 T = J1 + J2 + J3 + J4 + J5 

30 Al= T / 5 

40 Vl=((Al-Jl)“2+(A1-J2)*2+(A1-J3) *2+(Al-J4) ~2+(Al-J5)*2))/(5-1) 
50 PRINT "AVERAGE IS Al," VARIANCE IS VI 
60 DATA 50,70,85,99,65 
70 END 


in this program, the READ statement reads the five 
numbers and stores them in the variable names Jl, J2, J3, 
J4, and J5. After the computer executes the program, the 
computer memory would look as follows: 
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MEMORY 

LOCATION 

LABELS 

VALUES 


COMPUTER MEMORY 


Jl 

J2 

J3 

J4 

J5 

T 

A1 

VI 

50 

70 

85 

99 

65 

365 

73.8 

354.71 


, pUter . crGates a memory space for each variable 
a nd puts the associated value in the memory. Each variable 
can hold one value. The computer knows the value by looking 
for the variable name in the memory. Therefore, when the 
program later refers to Jl, the computer checks memory Jl 
and picks the number 50 out of the memory. Therefore, with 
the techniques discussed so far, we have to use a separate 
variable for each number in the list. That is, if we have 60 
numbers, we would need 60 variable names for the data. This 
procedure makes it difficult for a programmer to name 60 
variables and then refer to them in a equation as that in 
line 20 and 40. In addition, in other problems to be 
discussed later, even to refer to each variable will not be 
sufficient to solve the problem. 

In this chapter we are going to learn about variables 
that can hold more than one value at a time. These variables 
are called array. Under this approach we can name the entire 
data list by a single variable. An array variable can hold 
more than one value at a time. The individual value in the 
list is then identified by referring to it by its position 
in the list. The name that refers to an array is called 
array variable. The naming rules of array variables are the 
same as a simple variable. Each value in an array is re¬ 
ferred to as an array element. Each element has a location 
number in the array. That is, the first value in the array 
is the first element of the array and will be referred to by 
the location number in the array. Thus, if we were to use an 
array for the five numbers listed above, the memory would 
look as follows: 
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COMPUTER MEMORY ALLOCATED TO ARRAY J 


MEMORY 

LOCATION 

NUMBER 

VALUES 


ARRAY VARIABLE 
J 


1 

2 

3 

4 

5 

50 

70 

85 

99 

65 


subscript 


In this memory, the array variable, J, has location 
numbers. That is, J1 is now J(l), J2 is now J(2), and so on. 
Therefore, when we wish to refer to the value in the first 
location, we have to give the name and the location of the 
array, i.e. J(l). The computer keeps track of the elements 
by their numbers. In the context of an array these numbers 
are referred to as subscripts. It is important not to con¬ 
fuse a subscript with the value that is stored in the array. 
A subscript refers to one of the locations of the array, 
while value is the element (value) stored in that location. 
Thus, J(l) means that you want the first, the subscript, 
memory location of the array J. However, the array element 
50 is stored there. 

The data in an array is stored under one array varia¬ 
ble name. However, in most cases, except in the matrix 
manipulation, an array variable cannot be used by itself 
collectively. That is, each array variable must be followed 
by its subscript to identify the element in the array. That 
is, by using a subscript, an element can be used as a simple 
variable. 


SUBSCRIPT 


A subscript identifies the element of an array. A 
subscript must be numeric variable, numeric constant, or 
numeric expression. That is, any of the following are valid 
subscripts: 

10 PRINT J(l) 
or 
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10 K = 1 

20 PRINT J(K) 

or 

10 K = 1 

20 L = 2 

30 PRINT J(K*L) 


These statements show that a subscript could be creat¬ 
ed by using different forms. However, the most common form 
of subscript used to access elements in an array is the 
FOR...NEXT statement. 


DIM STATEMENT - ONE DIMENSIONAL ARRAY 

We have discussed array and subscript. However, the 
computer has to be told whether a variable is simple or an 
array variable. To declare to the computer that a variable 
will be used as an array, we must make this declaration with 
the DIM statement. The general form of the DIM statement 
is: 


Ln DIM varname ( n ) 


This statement consists of a statement number (Ln), 
the keyword DIM followed any BASIC variable name, parenthe¬ 
sis and the size of the array with the parentheses. The DIM 
statement is always placed in the beginning of the program. 
However, it must come before the statement where the array 
is used. Most computers specify a maximum size of 10 by 
default, if not otherwise specified by the programmer. 
However/ it is advisable to use the DIM statement all the 
time. For example, 


10 DIM J (5) 
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In this statement, we have informed the computer to 
create an array variable J consisting of five memory spaces, 
one for each element, and to label each memory space from l 
to 5. The number in parentheses is not a subscript but the 
size of the array J. The memory would look as shown above. 
However with this statement, in some computer systems, a 
total number of memory spaces could be six instead of five. 
These systems always label from 0 to 5, instead of 1 to 5. 
This default system would not create a problem, unless you 
refer to an array collectively instead of element by ele¬ 
ment. Nevertheless, in such cases, there are ways to inform 
the computer not to start from 0. That is, by adding the 
following statement before the DIM statement, you can con¬ 
trol the size of an array; 

Ln OPTION BASE 0 or 1 

The statement consists of line a number, the keywords 
OPTION and BASE followed by either 0 or 1. However, systems 
programmed not to start with zero would not require this 
statement. 

To rewrite the Program 7.1: 


PROGRAM 7.2 

10 DIM J(5) 

20 T = 0 
30 V = 0 

40 FOR 1=1 TO 5 
50 READ J(I) 

60 T = T + J(I) 

70 NEXT I 

80 ' A1 = T /(I-l) 

90 FOR 1= 1 TO 5 

ICO V = V + ( J (I) - Al) * 2 

110 PRINT J(I) 

120 NEXT I 

130 VI = V / ( I - 2 ) 

14 0 PRINT "THE AVERAGE OF THE ABOVE NUMBERS IS A1 

150 PRINT "THE VARIANCE OF THE ABOVE NUMBER IS VI 

160 DATA 50,70,85,99,65 
170 END 
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This program looks longer than Program 7.1, but it is 
more versatile. You can read more numbers without changing 
the program except for the DATA statement and the limit 
value of the FOR...NEXT statements. You can also use the 
INPUT statement instead of the READ..DATA statements. You 
can also control the limit value with the INPUT statement. 

When line 10 of the program is executed, the computer 
creates a memory space for five elements and labels those 
spaces as J and each space as 1, 2, 3, 4, and 5. Line num¬ 
bers 20 and 30 are used for counters. Each counter is a 
simple variable. Therefore, the computer creates a single 
memory space for each variable and labels them with the 
variable names. Then in line 40, the loop starts with the 
index I. This loop creates a subscript for the array ele¬ 
ments. Line 50, the READ statement, will become READ J(l) 
when the loop is executed the first time, and will read a 
value from the DATA statement and put it in J(l) memory. 
That value is also added to the counter in line 60. The loop 
continues until five values are read and added to the coun¬ 
ter. Line 80 calculates the average and storage in memory 
space labeled as Al. Then the next loop calculates the 
differences by subtracting the average from each of the 
values which are still in the memory of the computer. In 
line 130, the variance is calculated. The output of this 
program is as follows: 


OUTPUT 7.1 

50 

70 

85 

99 

65 

The average of the above numbers is 73.8 
The variance of the above numbers is 354.72 
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As we saw in the above program, the FOR...NEXT state¬ 
ments are better for controlling the subscripted variables 
(array). 

Suppose you want to read a set of numbers and then 
print them in reverse order. For example. 




PROGRAM 7.3 

10 

DIM 

A (10) 

20 

FOR 

J = 1 TO 10 

30 

READ 

A (J) 

40 

NEXT 

J 

*50 

FOR 

J = 10 TO 1 STEP -1 

60 

PRINT A (J) 

70 

NEXT 

J 

80 

DATA 

20,90,60,50,30,70,80,35,40,65 

90 

END 



In this program, the array is reversed by changing the 
index initial and limit values. The output of the piogram is 
as follows: 


OUTPUT 7.2 

65 

40 

35 

80 

70 

30 

50 

60 

90 

20 
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The most important use of an array is sequential 
ordering of numbers. That is, we can sort value in ascending 
or descending order with the use of an array. However, let 
us first learn how to find the largest value and the small¬ 
est value among the ten numbers. This will require reading 
all the numbers in to an array and checking for the smallest 
and the. largest values amongst them. The following program 
will accomplish this: 



PROGRAM 7.4 


10 

DIM A(10) 


20 

FOR I = 1 TO 10 


30 

READ A(I) 


40 

PRINT A(I); 


50 

NEXT I 


60 

PRINT 


70 

VI = A(1) 


80 

V2 = A(1) 


90 

FOR I =2 TO 10 


100 

IF A(I) >= V2 THEN 

V2 = A (I) 

110 

IF A(I) <= VI THEN 

VI = A(I) 

120 

NEXT I 


130 

PRINT " THE LARGEST 

VALUE IS V2 

140 

PRINT " THE SMALLEST VALUE IS VI 

150 

DATA 20,90,60,50,30, 

70,80,35,40,65 

160 

END 



We read the ten numbers first. In line 70, we assume 
that the first element of the array is the smallest and 
assign it to variable VI. In line 80, we assume that the 
first element of the array is the largest and assign it to 
variable V2. Even though this may not be true, but we need a 
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. .. ^ ciicceeding element to determine 

value to compare with each succ 9 laest . m line 110, 

which is the smallest and which th ^ find an element 

we compare VI with the each ele * tQ V1 and continue 

smaller than VI, we assign the the t i me the loop is 

until all the elements are check . ^ nts will have been 

completed, the smallest among t to ii ne 100. The 

assigned to VI. The same reasoning a PP| 
output of the program would look as fol 



OUTPUT 7.3 


20 

90 60 50 30 70 80 

35 40 65 

THE 

LARGEST VALUE IS 

90 

THE 

SMALLEST VALUE IS 

20 


The use of an array is 
discussed so far. We can copy 
For example, 


not limited to the examples 
one array into another array. 



PROGRAM 7.5 


10 

DIM A(10), X(10) 


20 

PRINT "X A" 


30 

FOR I = 1 TO 10 


40 

READ A(I) 


50 

X(I) = A (I) 


60 

PRINT X(I), A(I) 


70 

NEXT I 


80 

DATA 20,90,60,50,30,70,80,35,40,65 


90 

END 
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n e program, the data is read and stored in the 
array A, and in line 40 it is also stored in the array X. 
Keep in mind that both arrays have been declared in line 10. 


PROGRAM 7.4 

X 

A 

20 

20 

90 

90 

60 

60 

50 

50 

30 

30 

70 

70 

80 

80 

35 

35 

40 

40 

65 

-65 


Suppose we want to modify the Grade program so that we 
print each examination grade and the average grade of each 
student. In addition, we want to find the average grade of 
the whole class in each examination and the overall average 
for the class. The modified program would look as follows: 


PROGRAM 7.6 


10 DIM G(10) , Z (3) 

20 T1 = 0 

30 PRINT " HOW MANY STUDENTS YOU WANT TO ENTER"; 

40 INPUT M 
50 FOR I = 1 TO M 

60 PRINT "TYPE THREE EXAMINATION GRADES FOR EACH STUDENT" 
70 T = 0 

80 FOR K = 1 TO 3 

90 INPUT G(K) . 

(continued on next page) 
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PROGRAM 

100 T = T + G(K) 

110 Z(K) = Z(K) + G(K) 

120 NEXT K 

130 A2 = T/3 . stude nt are" ;G(1);G(2) ;G(3) 

140 PRINT"Examination scores °f thl * s „. A2 
150 PRINT " and the average grades is , 

160 T1 - T1 + A2 

170 NEXT I 

180 A1 = T1 / (1-1) 

190 FOR K = 1 TO 3 

200 Z(K) = Z(K)/3 

210 NEXT K . and overall average" 

220 PRINT "Average examination scor z(3) , A1 

230 PRINT "for this class are > Z(l ), • 

240 END 



In the program, line 10 declares two arrays, G for 
storing grades* and Z ior keeping the total for each examine- 
i-i on orade. You might think that since there are three 
ovaminations why not have a simple variable to total each 
examination. 'Even though that is possible, it is much easier 
to keep the running total in an array which makes it easier 
to print in some situations. We still need two counters, 
for P keeping the total of each student's grades, and T1 for 
keeping the total of the whole class. 


In line 70, T is initialized to zero (0) for each stu 
Hpnt T hat is, the three examinations of each student are 
totaled in line 100, the average is calculated in line 130, 
and print in line 150. The T is initialized back to zero to 
be used for another student. In line 110, array Z is adding 
up each examination for the whole class. In lines 190 
through 210, the average of each examination is calculated 
and printed' in line 230 along with the average for of all 
the three examinations for the whole class. 
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The output of the program is: 


OUTPUT 7.5 

HOW MANY STUDENTS YOU WANT ENTER? 3 
TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 40 
? 60 
? 70 

Examination scores of this student are 40 60 70 

and average grade is 56.6666 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 90 ' 

? 99 
? 95 

Examination scores of this student are 90 99 95 

and average grade is 94.6666 

TYPE THREE EXAMINATION GRADES FOR EACH STUDENT 
? 86 
? 88 
? 99 

Examination scores of this student are 86 88 99 

and average grade is 91 

Average Examination scores and overall average in this class is 
72 82.3333 88 80.7777 


In this output, three examination grades for each of 
the three students were entered. The computer printed each 
examination grade and the average for each student. At the 
end of the program, the average score in each examination 
and the overall average score of the class was printed. 
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DIM STATEMENT - TWO-DIMENSIONAL - Matrix (Table) 

Array allows for storing a list of da ^‘ ^g Ch orfe^sub- 
accessed by referencing its subscrip • ' However 

script is required to access value in ■?*"**• V ' 

there are situations which require stori g 
variable under one collective name. For examp , 

nr>& pt F 7.1 


COLUMN 

ROW 123 



The above table has names and grades of three students 
in rows 1,2, and 3, and the name of the student and his 
three examination grades in columns 1,2,3, and 4. That is, 
the rows refer to each student, and columns refer to the 
examination grades. For example, the data in row one repre¬ 
sents the three examination scores of Khalid. Thus, the 
score of Khalid in the first examination can be found in row 
1 and column 2. On the other hand, the score of Said in the 
third examination can be found in row 3 and column 4. 

This arrangement of information in rows and columns is 
referred as a two-dimensional table, or a matrix. In our 
example, the two-dimensional table is comprised of three 
rows and four columns, a total of 12 data items (3 x 4). 
However, we cannot use the same table name for numeric data 
as well as for character data. Therefore, we will have to 
declare an array for the names column and a table for the 
grade columns. 
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Like an array, a table is identified by a variable 
name. The naming of a table follows the same syntax rules as 
a simple variable. However, to identify an element in a 
table, the table along the row and the column number must be 
given. That is, an element is referred to by specifying the 
table name and two subscripts. The subscripts are enclosed 
in parentheses and separated by comma. The first subscript 
is the row number and the second subscript is the column 
number. 

The table name must be declared in the DIM statement. 
The general format of the DIM statement for declaring a 
table is: 

Ln DIM varname (n of rows, n of columns) 

This statement consists of a line number (Ln), the 
keyword DIM, table name followed by parentheses and the 
number of rows and the number of columns that a table would 
consists of. For example, 

10 DIM G ( 6, 5) 

This statement declares a table named G with the 
maximum number of 6 rows and 5 columns. When the computer 
executes this statement, it will create a memory block as 
follows: 


G 



1 

2 

3 

4 

5 

1 

(1/D 

(1/2) 

(1/3) 

(1/4) 

d/5) 

2 

(2/1) 

(2/2) 

(2,3) 

(2,4) 

(2,5) 

3 

(3/1) 

(3/2) 

(3,3) 

(3,4) 

(3,5) 

4 

(4/1) 

(4/2) 

(4,3) 

(4,4) 

(4,5) 

5 

(5,1) 

(5,2) 

(5,3) 

(5,4) 

(5,5) 

6 

(6/1) 

(6,2) 

(6,3) 

(6,4) 

(6,5) 
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The computer creates the above memory and a reference 
could be made to each cell, the intersection of a row and a 
column, by providing the two subscripts of the cell as shown 
above. For example, to access a value in row six and column 
four, we will specify G (6,4). The left subscript is the 
row, and the right subscript is the column. As noted previ¬ 
ously, the subscript could be a constant, a variable, or an 
expression. The FOR..NEXT statements are commonly used to 
specify the subscripts. By varying the row subscript, we 
move from one row to another. By varying the column sub¬ 
script, we move from one column to another. 

Let us write a program that reads and prints three rows and 
two columns of numbers: 



PROGRAM 

7.7 

10 

DIM N(3,2) 


20 

FOR 1=1 TO 3 

30 

FOR J = 1 TO 2 

40 

READ N(I,J) 


50 

NEXT J 


60 

NEXT I 


70 

PRINT " 

COLUMN" 

80 

PRINT " ROW 

1 2" 

90 

FOR 1=1 

TO 3 

100 

PRINT I; 


110 

FOR J = 1 TO 

2 

120 

PRINT N (J,I) 

• 

i 

130 

NEXT J 


140 

PRINT 


150 

NEXT I 


160 

DATA 90,99,95 

,86,88,99 

170 

END 
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The output of the program is as follows: 


OUTPUT 7.6 


COLUMN 

ROW 

1 2 

1 

90 99 

2 

95 86 

3 

88 99 


The computer initializes index I, line 20, and then 
index J, line 30. It reads the value 90 in the data state¬ 
ment and stores it in row one and column one, of table N. 
The inner loop is executed twice. It means the next value, 
99, is stored in N(l,2). After executing the inner loop, the 
value of index I is increased by 1. The next values to be 
read will be 95 and 86 and will be stored in cells N(2,l), 
N (2,2) respectively. The index I is increased by 1. The next 
values to be read will be 88 and 99 and will be stored in 
cells N(3,1), N(3,2). 

Let us write a program to load the data in Table 7.1 
into the computer memory. 


PROGRAM 7.8 


10 

DIM 

N$(3), G(3 

20 

FOR 

1 = 1 TO 

30 

READ 

N$ (I) 

40 

FOR 

J = 1 TO 

50 

READ 

G(I,J) 

60 

NEXT 

J 

70 

NEXT 

I 

80 

DATA 

Khalid,90, 

90 

DATA 

Said,40,60 

100 

END 
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In this program, line 10 declares one array, N$ of 
size 3 for storing the names, and table G of sizes 3 by 3, 
for storing three examination scores each for e 
students. In line 20, index I is initialized to one. In line 
30, the READ statement reads the name of the first student 
in the DATA statement and stores it in N$(l), and then the 
index J is initialized to 1. The READ statement reads the 
examination score of the first student and stores m the 
table. The memory, if we could see, would look as follows. 

COMPUTER MEMORY 



Since the computer completes the inner loop first, the 
J will be changed to 2. The READ statement in line 50 will 
read the second examination score of the same student and 
store it in the computer memory in row one and column two of 
Table G. Then the third examination score will be read and 
stored in the first row and the third column of Table G. 
Since the J exceed the limit value, the outer loop will be 
executed, the value of I will be changed to 2. The READ 
statement, line 30, will read the name of the second stu¬ 
dent. The index J will be initialized to 1. The first exami¬ 
nation score of the second student will be read and stored 
in the computer memory. The computer memory would look as 
follows: 


COMPUTER MEMORY WHEN 1 = 2 and J = 1 
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This process will continue until the names of the 
students and their grades have been read. The memory of the 
computer would look as follows: 


1 

2 

3 


COMPUTER MEMORY WHEN I 

G 


N$ 


= 3 AND J = 3 


1 

1 2 3 

I J 

Khalid 

Riaz 

Said 

90 99 95 

86 88 99 

40 60 70 

3 3 



Let us rewrite the Grade program. The new grade pro¬ 
gram using the two-dimension format would look as follows: 


PROGRAM 7.9 

10 T1 = 0 

20 DIM N$(10),G(10,3), Z ( 3) 

30 PRINT"HOW MANY STUDENTS YOU WANT TO GRADE"; 


40 INPUT M 
50 PRINT 
60 PRINT 

70 PRINT" GRADE SUMMARY" 

80 PRINT 

90 PRINT" NAME EXAMINATION GRADE AVERAGE" 

100 PRINT"-- 

110 FOR I = 1 TO M 
120 READ N$(I) 

130 PRINT USING " \ \ \ \";N$(I);" | "; 

140 T = 0 

150 FOR K = 1 TO 3 


(continued on next page) 
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PROGRAM 7.9 . (continued) 

160 READ G (I, K) 

170 T = T + G(I,K) 

180 Z (K) = Z(K) + G(I,K) 

190 PRINT USING "###.## \ \"; G(I,K),*" | "? 

200 NEXT K 
210 A2 = T/3 

220 PRINT USING » ###.##";A2 

230 T1 = T1 + A2 

240 NEXT I 

250 A1 = T1 / (1-1) 

260 FOR I = 1 TO 3 
270 Z(I) = Z(I) / M 
280 NEXT I 

290 PRINT"- 

300 PRINT" AVERAGE | "; 

310 PRINT USING" ###.## \ \ ";Z(1);" |";Z(2);" |";Z(3);" |";A 

320 DATA Khalid,90,99,95,Riaz,86,88,99,Said,40,60,70 
330 END 


In the program the names are read in line 160 and 
stored in array N$; then the grades are read in line 160 and 
stored in G(I,K) table. The grade of each student is added 
in line 170, T. 

Line 180 adds each examination grades. The grades are 
printed by the format in line 190. The rest of the state¬ 
ments are the same in the previous Grade program. The output 
of the program is as follows: 
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OUTPUT 7.7 

HOW MANY STUDENTS YOU WANT TO GRADE? 3 

GRADE SUMMARY 

NAME EXAMINATION GRADE AVERAGE 


Khalid 

Riaz 

Said 

90.00 

86.00 

40.00 

99.00 

88.00 
60.00 

95.00 

99.00 
70.00 

94.67 
91.00 

56.67 

Averages 

| 72.00 

1 82.33 1 

1 88.00 

1 80.78 


In this output, besides the titles, each student's 
grades are printed and the average of the three grades is 
printed at the end of the row. The average of each examina¬ 
tion is printed along with the average for the class. 

You can modify this program to read any number of 
students by inputting larger numbers for the number of 
students to be graded. You can change the number of examina¬ 
tions you want to read by changing the number in the FOR 
statement in line 150 from 3 to any number of examinations 
you want to read. Keep in mind that you must provide the 
appropriate number of students and examinations in the DATA 
statement. If you want to input the data every time the 
program is run, and is necessary to change the READ state¬ 
ments to INPUT statement in lines 120 and 160. 
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QUESTIONS 

1. Define an array and a matrix. 

2. What does the DIM statement do? 

3 . What would happen to an array if the DIM statement was not 
specified in the program? 

4. What is a subscript and why it is needed? 

5. Write a program that reads and prints grades, one for 
each student, of ten students and calculates the average 
grade for the class. Use an array. 

6. Write a program that calculates average and variance of 
the numbers between 10 and 20 inclusive. You must use a 
counter and must not read or input the numbers into the 
program. 

7. Write a program that reads the height and the weight of 
a man and determines whether he is overweight, under¬ 
weight, or average weight. Use Do loop to generate the 
following table values and store them in an array. 


Height Average Weight 


5* 

- 

1" 

128 

- 

134 

5' 

- 

2" 

134 

- 

140 

5' 

- 

3" 

140 

- 

144 

5' 

- 

4” 

143 

- 

149 

5' 

- 

5" 

147 

- 

153 

5 ' 

- 

6" 

152 

- 

158 

5 ' 

- 

7” 

156 

- 

163 

5 ' 

- 

8" 

161 

- 

167 

5' 

- 

9 " 

166 

- 

172 

5 ' 

- 

10" 

171 

- 

176 

5 ' 

- 

11" 

175 

— 

181 

6 » 

— 

0" 

181 

- 

186 

6' 

— 

1" 

186 

- 

191 

6' 

— 

2" 

191 

- 

196 

6' 

— 

3" 

197 

- 

200 
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Write a program that reads the wages of ten employees 
and deducts income tax based on the following table. 
Use the Do loop to create the table. Also, your program 
should calculate the average and the variance of the 
wages. 


Wages Tax Rate 


0 

- 

10000 

0 

% 

10001 

- 

20000 

2 

% 

20001 

- 

30000 

4 

% 

30001 

- 

40000 

6 

% 

40001 

- 

50000 

8 

% 

60001 

- 

70000 

10 

% 

80000 

- 

90000 

12 

% 

100000 

and 

over 

14 

% 


. Show the number of lines and the values that will be 
printed by each of the following program segments. 

a) FOR I = 1 TO 5 
Y(I) = I 

NEXT I 
PRINT Y; 

b) DIM W (10) 

FOR I = 1 TO 20 STEP 5 
W (I) = I 
NEXT I 

PRINT W(I), W(I+1), W(1+2), W(1+3) 

C) DIM W (20) , Y ( 20 ) 

FOR I = 1 TO 100 STEP 10 
W (I) = I 
Y (I) =1 + 1 
PRINT I 
NEXT I 
PRINT W, Y 
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d) FOR J = 1 TO 2 
FOR K = 1 TO 3 
W(J) = J 
Y(K) = K 
PRINT J,K 
NEXT K 
NEXT J 


10. Correct errors, if any, in the following program segments 

a) FOR I = 10 TO 30 STEP -1 
Y(I) = I 

NEXT I 

b) FOR J = 1 TO 10 
J = Y(J) 

NEXT I 

d) FOR 1=40 TO 0 STEP 2 
Y(K) = I 

NEXT I 

e) FOR J = 1 TO 15 
W(J) = J + 1 
PRINT J 

NEXT J 

C) FOR L = 1 TO 10 
FOR K = 1 TO 2 
FOR J = 1 TO 3 
W(J) = J 
X (K, J) = K 
Y(L, K) = K 

PRINT W(J), X (K, J), Y (L,K) 

NEXT J 
NEXT L 
NEXT K 

11. Write a program that prints two columns of numbers. The 
first column should have the numbers between 10 and 20 
and the second column between 4 0 and 60. You should not 
input or read data. 
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12. Write a program that will 
numbers and will print the 
each row and each column. 


read the following table of 
average and the variance of 


10 

20 

44 

45 

60 

30 

66 

43 

40 

50 

60 

40 

35 

99 

20 

39 


50 

80 

90 

50 

25 

29 

40 

60 

30 

20 

34 

43 

50 

60 

77 

88 


13. 


14. 


^ r fte a program that reads 15 
prints them first in ascending 


numbers and then sorts and 
and then in descending order. 


Suppose array A has been created as follows: 


Location 

Value 


__ 2 34 56789 10 

5 10 6 9 12 4 8 13 3 


11 


Assume that the value of L is 5 and M is 4. What value 
W1 H each of the following statements print? 

a) PRINT A(L) 

b) PRINT A(M) 

c) PRINT A(M+L) 

d) PRINT A(L+1) 

e) PRINT A(M+l) 


15. Suppose matrix A has been created as follows: 

Location 123456789 10 


5 

10 

6 

9 

12 

4 

8 

13 

3 

11 

6 

11 

7 

10 

13 

5 

9 

14 

4 

12 

7 

12 

8 

11 

14 

6 

10 

15 

5 

13 

8 

13 

9 

12 

15 

7 

11 

16 

6 

14 
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Assume that the value of L is 5 and H is 4. What value 
will.each of the following statements print? 


a) PRINT A(L,2) 

b) PRINT A(3,M) 

c) PRINT A(4,M+L) 

d) PRINT A(3,L+1) 

e) PRINT A(2,M+l) 


16. A company sells four products with five models of each 
product. The following table gives the prices of each 
model of each product. 


Price of each Product and Model 


Model 

Product 12345 


1 

2 

3 

4 


5 

10 

6 

9 

12 

6 

11 

7 

10 

13 

7 

12 

8 

11 

14 

8 

13 

9 

12 

15 


Write a program that prints the customer number, the 
quantity sold, the price of each product and model, and 
the sales amount next to the customer number and the 
quantity sold to each customer. All of this information 
should be printed in a tabular form. 


17. Write a program that adds, subtracts, and multiplies two 
arrays. 

18. Write a program that adds, subtracts, and multiplies two 
matrices. 
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19. 


Write a program that reads 
distribution in different 
results as follows. 


survey results of the income 
cities and summarizes the 


Income Distribution by Cities 
Number of People in each City 

_^=°”®_Leve];_Lahore Karachi Multhan 

0 - 10000 

10001 - 20000 

20001 - 30000 

30001 - 50000 

50001 and over 
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SUBPROGRAMS - FUNCTIONS AND SUBROUTINES 


FUNCTIONS: 

A function is a predefined algorithm. That is, it 
performs some calculations. Some functions re urn va ues or 
a value to the statement which makes the reference ( 
the function each time within the program. 


BASIC provides two kinds of functions: 

1. Built-in functions are predefined within the language. 
The built-in functions can be classified as: 


a) Mathematical 

b) System 

c) String 

d) Matrix 

However, only the mathematical, string, and matrix 
functions will be discussed in this book. The matrix func¬ 
tion will be discussed as an appendix, and the other two 
be discussed in this chapter. 

2. user-defined functions are defined by the programmer. 

There are two types of user-defined functions: 

a) Single-line 

b) Multiple-line 
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Built-in Functions: 


Mathematical Function: 


coi v inI h w/ anY mathematical operations that we need for 
solving business or mathematical problems, 
these operations are already programmed 

^ Dl t St haVS t0 find the correct name of the pro¬ 
grammed operation (function) and use it 

program. The general form of the function 


Luckily, most of 
by the computer 


as a part of 
statement is: 


our 


Ln 


varname — function name (value or expression). 


The statement consists of the line number (Ln), a 
variable name, the equal sign, the name of the function, and 
a value or an expression commonly referred to as the func¬ 
tion argument. The value or argument is passed on to the 
function to work on. For example, to find the square root of 
a number, we need to tell the computer the name of the 
function and the value of which we want to find the square 
That is, 


10 T = SQR(9). 


In this statement, the function name is SQR. By speci¬ 
fying the SQR, we have asked the computer to find the pro¬ 
gram named SQR, calculate the square root of the number 
nine, and store the result in the variable named T. These 
Programs are referred as a built-in functions. This is one 
of the mathematical functions available on most BASICS. 
Table 8.1, lists the most common numeric functions: 
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Function 


ABS (Y) 


ATN (Y) 


COS (Y) 


EXP (Y) 


FIX (Y) 


TABLE 8.1 
Numeric Functions 

Description 

Finds the absolute value of Y. For example, 

10 V = ABS (-10) 

RESULT: V = 10 

Finds the angle in radians, the arctangent of Y. 
For example, 

10 T = ATN(10) 

RESULT: T = 1.471128 

Finds the consine of the Y. Y is in radians. 

For example, 

10 T = COS (10) 

RESULT : T = -.8390716 

Finds e (2.71828) raised to the power of Y. 

For example: 

10 

10 T = e 
RESULT: T = 22026.32 

Finds the integer (whole number) value of the a 
fraction. For example, 

10 T = FIX(67.323) or FIX(67.67) 

RESULT : T = 67 
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INT (Y) 


LOG(Y) 


RND 


SGN(Y) 


Finds the truncated number (integer) of the 
positive value of Y. For example: 

10 T = INT (6.7). 

RESULT : T = 6. 

OR 

Finds the greatest integer that is less than 
or equal to Y. For example, 

10 T = INT (-6.3) 

RESULT : T = -7. 


In this case, the -7 is the greatest integer less 
than -6.3. 

Finds the natural logarithm for Y > 0. It is the 
reverse of the EXP(Y) function. For example, 

10 T = LOG(20) 

RESULT : T = 2.995732 

Finds the random numbers between 0 and 1. It 
could also be written as RND (Y), but most 

computer do not require the value or argument Y. 

Finds the sign of Y. There are three possible 
values : -1, 0, 1. If Y is positive non-zero 
number, the return value will be 1; if Y is 

zero, the returned value will be 0; if Y is 

negative, the returned value will be 1. For 
example, 

10 T =SGN(10) 

RESULT : T = 1 
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SQR(Y) Finds the square root of a positive number Y 

For example, 

10 T - SQR(10) 

RESULT : T =? 3.162278 


NOTE: 


Some BASICS may not have some of the 

Check your system's book for availabl 


functions. 
functions. 


Let us write a program using all these 


built-in functions. 


PROGRAM 8.1 

10 Y = 10 
20 T = EXP (Y) 

30 PRINT " EXP. FUNC. "? T, EXP(X) 
40 T = ATN(Y) 

50 PRINT "ARCTANGENT " T, ATN(Y) 
60 T = COS(Y) 

70 PRINT " COSINE "J T 
80 T = SGN(Y) 

90 PRINT "SGN " ; T 
100 T - SQR(Y) 

110 PRINT "SQUARE ROOT",T 
120 Y = -10 
130 T = INT(Y) 

14 0 PRINT " INTEGER VALUE T 
150 T = ABS(Y) 

160 PRINT "ABSOLUTE VALUE T 
170 T = LOG(20) 

180 PRINT "LOG "? T 

190 PRINT " RANDOM NUMBERS" 

200 FOR 1= 1 TO 10 
210 T = RND 
220 PRINT T 
230 NEXT I 
240 END 
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In some print statements, you will find the variable 
name and function name in the same statement. The purpose of 
this repetition is to show you that the results of a func¬ 
tion could be printed without first being stored in a varia¬ 
ble. The output of the above program is as follows: 



OUTPUT 8.1 


EXP. FUNC. 

22026.47 

22026.47 

ARCTANGENT 

1.471128 

1.471128 

COSINE 

-.8390716 


SGN 

1 


SQUARE ROOT 

3.162278 


INTEGER NUMBER -7 

ABSOLUTE VALUE 6.3 


LOG 

2.995732 


RANDOM NUMBERS 


.7151002 
.683111 
.4821425 
.9992938 
.6465093 
.1322918 
.3692191 
.5873315 
.1345934 



.9348853 




Random Numbers: 


in the above output v. 

The function RND was used ^ ^ are involved in sinmla _ 

t ion ^Through “a Specie 

llrrM0 ana less than X has 
an equal chance of being selected. 
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However, any time the same program with an RND func¬ 
tion is executed, it will generate the same set of numbers. 
If a different set is needed, the following statement must 
precede the RND function: 

Ln RANDOMIZE 

For example, the following set of statements will 
generate a different set of numbers every time they are 
executed. 


PROGRAM 8.2 

10 RANDOMIZE 
20 FOR I = 1 TO 10 
30 PRINT RND 
40 NEXT I 
50 END 


The outputs of the above program run twice are: 


OUTPUT 8.2 

RANDOM NUMBER SEED (-32768 TO 32767)? 324500 

.6646266 

.2031866 

.9959512 

.2943542 

.3104612 

.4695987 

.4284047 

.2433319 

.7245145 

.4796363 

(continued on next page) 
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String Functions: 

Many applications require the manipulation of charac¬ 
ters in a data. That is, some time we may want to modify, 
concatenate (add together), compare, and analyze a set of 
strings. BASIC provides many string functions to perform 
these operations. The general form of the string function is 
the same as mathematical functions, except the dollar sign 
($) is added at the end of the function name. For example, 


Ln var = function name$(var or value) 


Substring 

A substring is a group of one or more adjacent charac¬ 
ters in a string. For example, in string Shahabuddin, the 
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substrings are 
S 

Shah 

abudd 

in 

Shahab 

All these are considered substrings. That is, any 
adjacent characters like Shah or abudd or in or Shahab ir 
a string are substrings. 

BASIC provides functions to extract substrings from a 
string. The most common functions are listed in Table 8.2. 


TABLE 8.2 

Substring Functions 

Function Description 


LEFT$(var or str,N) Returns the first N characters of the 

variable or string. For example, 

A$ = LEFT$("Shahabuddin",5) 

RESULT : A$ = Shaha 

RIGHT$ (variable,N) Returns the rightmost N characters of the 

variable or string. For example, 

A$ = RIGHT$("Shahabuddin",5) 

RESULT : A$ = uddin 


MID$(var or str,N,M) Returns M number of characters starting 

at N. For example, 

A$ = MID$(Shahabuddin,4,3) 

RESULT : A$ = hab 
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In this example, three characters "hab" 
starting at location 4 are extracted. 

A$(M:N) Returns M through N character of string 

variable A$. 

LTRM$(var or str) Removes all leading spaces in a string 

variable or a string. For example, 

A$ = LTRM$(" Shahabuddin") 

RESULT : A$ =Shahabuddin 

In this example, the blank spaces before 
the string " Shahabuddin" are removed. 

RTRM$(var or str) Removes all trailing spaces in a string 

variable or string. For example, 

A$ = RTRM$("Shahabuddin ") 

RESULT : A$ =Shahabuddin 


In this example, the blank spaces after 
the name are removed. 

LPAD$ (var or str,N) Increases (pads) the size of the string 

by adding spaces on the left of the 
string. For example, 

A$ = LPAD$("Shah",6) 

RESULT : A$ = Shah 


In this example, two spaces were added to 
the left of the string. 


RPAD$ (var or str,N) 


Increases the size of the string by adding 
spaces on the right of the string. For 
example, 


A$ = RPAD$("Shah",6) 


RESULT : A$ =Shah 
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In this example, two spaces were added to 
the right of the string. 

RPT$(var or str,K) Creates a string by repeating the 

characters in the string K number 
of times. For example, 

A$ = ("Shah",3) 

RESULT : A$ = ShahShahShah 


NOTE: Some BASICS may not have all the functions. Check the 
your systems' BASIC book for available functions. 

In addition to the truncation functions. Table 8.4 
lists additional string functions. 

TABLE 8.4 

OTHER STRING FUNCTIONS 
Function Description 


LEN(var or str) Determines the length (the number of 

characters) of the variable or string. 
For example, 

M = LEN("SMALL") 

RESULT : M = 5 

Finds the ASCII code for the character 
of string. For example, 

B = ASC("A") or ASCII("A") 

RESULT : B = 65 


ASC(var or str) 

ASCII(var or str) 
or 

ORD(var or str) 
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Finds the character string or variable 
of the ASCII code. For example, 

A$ = CHR$(66) 

RESULT : A$ = B 

Finds the numeric equivalent in the 
string or variable. For example, 

B = VAL("A") 

RESULT : B = 0 

In this example, there is no number in the "A". 

B = VAL("1306 Preston") 

RESULT : B = 1306 

STR$(var or number) Finds a string equivalent of a number 

or numeric variable. For example, 

B$ = STR$(10) 

RESULT : B$ =10 

P0S(var or str,strl,K). Finds the position of strl within a 

string or variable. The position 
search begins at position K. For 
example, 

A = POS("Shahabuddin","b",2) 

RESULT : A = 6 

In this example, the string "shahabuddin" 
is searched for character "b" starting at 
position 2. It finds the character »b" at 
position 6th in the string. 

Keep in mind that in most microcomputers, the 
POS function returns the current cursor 
position on the screen. 


CHR$(var or str) 


VAL(var or str) 
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UPRC$(var or str) Replaces all lower-case characters 

with their uppercase equivalents. For 
example 

A$=UPRC$("Shahabuddin") 

RESULT : A$ = SHAHABUDDIN 

LWRC$(var or str) Replaces all uppercase characters with 

their lower-case equivalents. For exampl 

A$=LWRC$("SHAHABUDDIN") 

RESULT : A$ = shahabuddin 


NOTE: Check your system's BASIC for available functions. 


USER-DEFINED FUNCTIONS: 

As discussed in the preceding section, many functions 
are available in BASIC. However, there are many situations 
where the available built-in functions may not meet the 
needs of the programmer. These situations may require writ¬ 
ing our own functions. For such purpose, BASIC allows pro¬ 
grammers to write their own functions, called user-defined 
functions. These are written as one-line statements as a 
part of the program and referenced (called) from anywhere in 
the program. The general format of a user defined function 
is: 


Ln DEF FNletter(dummy argument) = expression. 


In this statement, the line number (Ln) is followed by 
the keywords DEF and FN. The DEF is used by the BASIC state¬ 
ment for recognizing the user-defined function in the 
program. The FN keyword should be followed by a letter A 
through Z. The dummy argument (parameter) within the paren¬ 
theses could be any numeric or string BASIC variable name 
followed by an expression to the right of the equal sign. 
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Expression is any mathematical expression which may contain 
a built-in function or other user-defined function. The DEF 
statement is a non-executable statement and must precede the 
statement where it is used. It can appear alone or as a part 
of another function. For example, 


10 DEF FNZ(X) = SQR(9) * X + X 


In this statement, the FNZ function will use the 
variable X for calculating the expression on the right of 
the equal sign. The expression on the right calculates the 
square root of 9 multiplied by the variable X and added to 
variable X. 

Once a function is defined, it can be referenced at 
any time, anywhere in the program by using its three-letter 
function name and a value or a defined variable. For exam¬ 
ple, the following statement in the same program could call 
the function FNZ defined in the statement number 10 above. 


120 LET R1 = FNZ(10) 


When the computer executes this statement, it starts 
looking (calls the DEF function) for a function FNZ in the 
program. It will find statement 10 in the program and make 
the value of X equal to 10. It will calculate the expression 
on the right of the equality and return to statement 120 and 
make the value of R1 equal to the result of statement 10. 
That is, the value of R1 will be 40. Statement 10 can be 
used as many times in the program as one wants. For example, 
another statement in the same program could call the same 
function using a different value: 


150 LET G1 = FNZ(36) 
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This statement 150 also calls statement 10. This time 
the value of X will be 36. The expression in statement lo 
will be evaluated and the results returned to statement 150 
and stored in variable Gl. 

The dummy variable (argument) assigned to the function 
as a parameter is local to the function. That is, a memory 
space is not created for it until the function is executed. 
For example, 


20 DEF FNR(R,P,Y) = P * (1+R)~Y 


160 READ R,P,Y 
170 A = FNR(R,P,Y) 


In this partial program, the function in line 20 is 
calculating compound interest. When R, P, and Y are read in 
line 160, the dummy variables R, P, and Y in line 20 are not 
affected (not defined) . That is, they are considered dis¬ 
tinct from any variables with the same name outside of the 
function definition. 

However, variables in the function's expression could 
be defined outside the function even though they are not 
listed as dummy variables in the function. For example, to 
rewrite the above program: 


20 DEF FNR(R) = P * (1+R)*Y 


160 READ R,P,Y 
170 A = FNR(R) 
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In this partial program, the variables P, R, and Y in 
the function statement are the same as in the READ state¬ 
ment. When the READ statement is executed, the variables R, 
p, and Y are assigned values. However, since no call has 
been made to the function yet, the R variable in the func¬ 
tion is not assigned value yet. The other two variables, P 
and Y in the function expression will be defined when the 
READ statement is executed. 

The functions can be callfed without writing them as a 
part of an assignment statement, i.e. as statement 170 
below. For example, to rewrite the above statements: 

/ • 


20 DEF FNR(R) = P * (1+R)‘Y 


160 READ P,Y 

170 PRINT FNR(1),FNR(2),FNR(3) 


In this partial program, only values for P and Y are 
read. In line 170, the PRINT statement calls the function 
three times and three different values of R are passed on. 
That is, the PRINT statement makes a call to calculate 
amounts for one year, two years, and three years. The pro¬ 
gram will print three amounts. 

As shown so far, the purpose of a use-defined function 
is that the same expression may be needed in many statements 
of the program. Therefore, instead of repeating the same 
expression in. every statement of the program, it is better 
to write it as function and then make a call to it. 
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SUBROUTINE 

The user-defined functions perform some 

tions. However, they are limited to ° nc = access ’ a set of 

situations the programmers may wan a]n This can be 

statements over and over ^? a ^ n a f statements that 

placed in a subroutine which is a needed in several 

performs a particular function and may placed at the 

parts of the program. Subroutines are usually p 
end of a program which is called a main program. 

The use of subroutines is becoming more common due to 
the popularity of structured programming and the use or 
modular programming. Since subroutines are ® separate 
perform certain activities, one can develop a s «P** a *f 
module (subroutine) for each activity and test and d^bug i 
before making it a part of the mam appUcation p rogram : 
Subroutines are small and related to one act y * 
fore, they increase the efficiency of programmers and make 
debugging easier. The main program acts as a controller by 
making calls and receiving messages from the subroutines. 

A subroutine can begin with any BASIC statement and 
ends with a RETURN statement. The general form of a subrou 
tine is as follows: 


Ln any BASIC statement 


>- set of BASIC statement 


Ln RETURN 
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In a subroutine 
BASIC statement. For 
statement should be a 
tine. For example, 


• the first statement could be any 
clarity, it is advisable that this 
REM statement to identify the subrou- 


300 REM SUBROUTINE INTEREST 


nKT p . tatement is followed by any number if other 

needed to solve a particular problem. The 
last statement must be the RETURN statement (which is used 

oSinoM 11 - 3 subroutine a nd has no other purpose.). When the 
RETURN is executed, the computer returns to the statement 
o lowing the statement in the main program where the sub¬ 
routine was called from and continues the execution of the 
main program. A program could have as many subroutines as 
needed provided they follow the above format. 


All the subroutines are normally placed at the end of 
the main program and before the END statement. However, if 
there is no break between the main program and the subrou¬ 
tines, the computer will continue to execute the subroutine 
in a normal seguence as a program. However, subroutines are 
called by the main program and cannot be executed as sepa¬ 
rate programs. Therefore, there should be a statement after 
the main program that breaks the normal seguence of the 
program. (For this purpose use either the GOTO n or the 
STOP.) However, in some systems, the use of the STOP state¬ 
ment could cause an unwanted message. In that case, use the 
GOTO n where the GOTO goes to the END statement in the 
program. Make sure that you choose either the STOP or the 
GOTO n but not both. 


The GOSUB is used in the main program for calling a 
subroutine from the main program. The general format of the 
call statement is: 


Ln GOSUB Lnl 
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In this statement, the line number (Ln) is the line 
number of the GOSUB statement followedI by’ the_ ke^ord GOSUB 
and the line number of the first statement of the subrou- 

tine. For example, 


10 

REM 

MAIN PROGRAM 

20 

READ 

P,R,N 

30 

GOSUB 

300 

40 

DATA 

1000,.05,10 

50 

READ 

P,R,N 

60 

GOSUB 

300 

70 

DATA 

2000,.05,10 

80 

PRINT 

"DONE " 


290 STOP (or) GOTO 350 Note : choose either STOP or GOTO 350 
300 REM SUBROUTINE INTEREST CALCULATION 
310 A = P* (1-R) ~N 

320 PRINT " AMOUNT ";A; " PRINCIPAL ";P 
330 PRINT " INTEREST RATE "; R; " YEARS N 
340 RETURN 
350 END 


This partial program shows that line number 20, the 
READ statement in the main program reads data for the three 
variables, P,R/ and N. Line number 30 makes a call to the 
subroutine in line 300. The subroutine calculates the com¬ 
pound iamount and prints the amount, principal, interest 
rate, and the number of years. Line number 340 in the sub¬ 
routine returns the computer back to the next executable 
statement following the GOSUB statement. That is, in our 
program the computer returns to line number 50 in the main 
program. The next READ statement reads new data and line 
number 60 makes another call to the subroutine. The subrou¬ 
tine calculates and prints the results and returns back to 
line number 80. After executing other statements between 
lines 80 to 280, the computer executes line 290. This state¬ 
ment either ends the program if the STOP command is used or 
transfers it to line 350 if GOTO 350 is used. 
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rail another cnhm can be used within a subroutine to 
tines However tK lne; . the Y are considered nested subrou- 
cubroutine*; q ' 1S a to the number of nested 
tines ^Two nr BA , SICs would not allow too many subrou- 
t i on<? * fTf \/ rSe levels are sufficient for most applica¬ 
nt??*’ I A US ? m ° re than three lev els, check your algo- 

=, r?o f- rC i er u° re ? uce the number of subroutines.) To 
write a nested subroutine, let us rewrite the above partial 
program: r 


10 

REM ] 

MAIN PROGRAM 

20 

READ 

P,R,N 

30 

GOSUB 

300 

40 

DATA 

1000,.05,10 

50 

READ 

P,R,N 

60 

GOSUB 

300 

70 

DATA 

2000,.05,10 

80 

PRINT 

"DONE " 


290 STOP (or) GOTO 380 Note : choose either STOP or GOTO 380 

300 REM SUBROUTINE INTEREST CALCULATION 

310 A = P* (1-R) ~N 

320 GOSUB 340 

330 RETURN 

340 REM SUBROUTINE PRINTING OUTPUT 
350 PRINT " AMOUNT ";A? " PRINCIPAL "; P 
360 PRINT " INTEREST PATE R; " YEARS N 
370 RETURN 
380 END 


In this partial program, in line 320, the CALCULATION 
subroutine calls the PRINTING subroutine within the subrou¬ 
tine. The control passes to line 340, and results are print¬ 
ed. The RETURN, in line 370, passes control back to line 
330. Line 330, the RETURN statement, returns the control 
back to the main program. 
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The following program show a complete program with 
subroutines: __ 


PROGRAM 8.3 


10 REM ********* MAIN PROGRAM ******** 

20 DIM X(500),F(50) ; M(50),B(50),C(50) 

40 REM C() IS FOR CUMULATIVE FREQUENCIES 
50 REM M() IS MIDPOINTS OF CLASS INTERVALS 
60 REM R() IS FOR CLASS LIMITS 
70 PRINT 

80 LET Bl$="PLEASE ANSWER YES OR NO" 

90 PRINT "DO YOU WANT INSTRUCTIONS"; 

100 INPUT Z$ 

110 IF Z$="NO" THEN 160 
120 IF Z$="YES" THEN 150 
130 PRINT Bl$ 

140 GOTO 100 
150 GOSUB 730 
160 C1=0 
170 PRINT 

18 0 PRINT " HAVE YOU TYPED THE DATA IN THE DATA STATEMENT "; 
190 INPUT A$ 

200 IF A$="YES" THEN 260 

210 IF A$="NO" THEN PRINT "DO YOU WANT TO INPUT THE DATA" 

220 INPUT Z$ 

230 IF Z="NO" THE GOSUB 730 
240 PRINT 

250 PRINT "ENTER THE NUMBER OF DATA POINTS "; 

260 IF Z$="NO" THEN READ N ELSE INPUT N 

270 IF z = "YES" THEN PRINT "ENTER ONE NUMBER AT A TIME" 

280 FOR 1=1 TO N 

290 IF Z$="NO" THEN READ X(I) ELSE INPUT X(I) 

300 LET C1=C1+1 
310 NEXT I 
320 PRINT 

330 PRINT "DO YOU WANT TO SEE THE DATA IN SEQUENTIAL ORDER"; 

(continued) 
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340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 


INPUT B$ (program continued) 

IF B$="NO" THEN 470 
IF B$="YES" THEN 390 
PRINT Bl$ 

GOTO 340 
PRINT 

PRINT "YOUR DATA IN SEQUENTIAL ORDER IS" 
PRINT 

GOSUB 1910 

REM ** TO PRINT ORDERED DATA 
FOR I = 1 TO N 
PRINT X(I); 

NEXT I 

IF B$="NO" THEN GOSUB 1920 

GOSUB 960 

PRINT 

PRINT "SMALLEST VALUE IS ";M1 
PRINT "LARGEST VALUE IS ";M2 
PRINT "RANGE OF THE DATA IS ";M2-M1 
PRINT 

PRINT "DO YOU WANT FREQUENCY TABLE 
INPUT Y$ 

IF Y$="YES" THEN GOSUB 1200 
IF Y$="NO" THEN 2500 
GOSUB 1470 

REM *** FREQUENCY HISTOGRAM 

PRINT 

PRINT 

PRINT "DO YOU WANT A FREQUENCY HISTOGRAM"; 
INPUT D$ 

IF D$="NO" THEN 2500 
IF D$="YES" THEN GOSUB 1700 
GOTO 2500 
REM 

REM ********* END OF MAIN PROGRAM ******* 


(continued) 
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690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 


SUBROUTINES 


SUBROUTINE : INSTRUCTIONS 


PRINT "THIS PROGRAM CREATES A FREQUENCY TABLE AND GRAPHS" 
PRINT "FREQUENCIES OF DATA. YOU CAN ENTER DATA EITHER " 
PRINT "THROUGH AN INPUT STATEMENT OR TYPE IT IN THE DATA " 
PRINT "STATEMENT STARTING AT LINE 2460." 

PRINT " " 

PRINT "INSTRUCTIONS : WHEN REQUESTED, ENTER THE FOLLOWING" 
PRINT " INFORMATION" 

PRINT " 1) THE NUMBER OF DATA POINTS (OBSERVATIONS)" 

PRINT " 2) ANSWER 'YES' IF THE DATA HAS ALREADY BEEN" 

PRINT " TYPED IN THE DATA STATEMENT. ANSWER 'NO 1 , IF" 

PRINT " THE DATA IS NOT TYPED." 

PRINT " 3) THE DATA MAY BE ENTERED IN ANY ORDER INTO" 

PRINT " THE DATA STATEMENT. HOWEVER, IF YOU WISH" 

PRINT " TO SEE THE DATA ORDERED IN DESCENDING ORDER," 

PRINT " TYPE 'YES' WHEN PROMPTED." 

PRINT "IF THE NUMBER OF OBSERVATIONS (DATA) IS GREATER" 
PRINT"THAN 500, THE NUMBER OF CLASS INTERVALS EXCEEDS 50," 
PRINT "THEN CHANGE THE DIM STATEMENT IN LINE 2 0 TO" 

PRINT "THE SIZE YOU WANT." 

RETURN 

REM . END OF SUBROUTINE INSTRUCTIONS . 

REM 

REM . SUBROUTINE SMALL AND LARGE . 

REM TO DETERMINE SMALLEST AND LARGEST VALUES 
LET M1=X(1) 

LET M2=X(N) 

REM DETERMINE THE VALUE 
IF X(1)>= THEN 1050 
IF ABS(10*X(1))<X(N) THEN 1050 
LET X9=X(1) 

GOTO 1070 
LET X9=X(N) 

IF C1<N THEN 1100 


(continued) 
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(program continued) 

1070 LET L=L-3 

1080 LET N9 = INT(72/L) 

1090 LET N8=INT(N/N9)+1 

1100 FOR 1=1 TO N8 

1110 FOR J=1 TO N9 

1120 IF N9*(I-1)+J>N THEN 1140 

1130 NEXT J 

1140 PRINT 

1150 NEXT I 

1160 PRINT 

1170 RETURN 


1180 REM. END OF SUBROUTINE SMALL AND LARGE 

1190 REM 

1200 REM. SUBROUTINE FREQUENCY TABLE. 


1210 REM 

1220 PRINT " ENTER THE NUMBER OF FREQUENCY INTERVALS." 

1230 PRINT " IT COULD BE A NUMBER BETWEEN 5 AND 10" 

1240 INPUT N1 

1250 D = (M2-M1)/N1 

1260 B(1) = Ml 

1270 REM TO SET UP LIMITS 

1280 FOR I = 2 TO Nl+1 

1290 LET B(I) = B(I-1)+D 

1300 NEXT I 

1310 REM TO DETERMINE CLASS FREQUENCIES 

1320 FOR I = 1 TO N 

1330 FOR J = 2 TO Ml + 1 

1340 IF X(I)>B(J) THEN 1350 

1350 LET F(J-1)=F(J-1)+1 

1360 GOTO 1380 

1370 NEXT J 

1380 NEXT I 

1390 REM DETERMINES CLASS MIDPOINTS AND CUMULATIVE FREQUENCIES 

1400 FOR I = 1 TO N1 

1410 LET M(I) = B(I)+B(I+1))/2 

1420 LET C(I) = C(I-l) + F(I) 

(continued) 
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1 1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 


(program continued) 

NEXT I 
RETURN 

REM. END OF SUBROUTINE . 

REM 

REM . SUBROUTINE : PRINTING . 

PRINT 

PRINT 

REM FREQEUNCY TABLE 

PRINT TAB(26);"FREQUENCY DISTRIBUTION" 

PRINT 

PRINT TAB (43 ): "CUM" ;TAB(52);"REL";TAB (64 );"REL CUM" 

PRINT TAB(5);"CLASS LIMITS"; 

PRINT TAB(22);"MIDPOINTS";TAB(34);"FREQ";TAB(43); 

PRINT "FREQ";TAB(52); "FREQ";TAB(64); "FREQ"; 

PRINT -- 

PRINT --" 

FOR I = 1 TO N1 

PRINT B(I);TAB(10) ; " - ";B(I+1); 

PRINT TAB(24) ;M(I) ;TAB(34) ;F(I) ;TAB(43) ;C(I) ; 

PRINT TAB(50); 

PRINT USING"##.## ###•###";F(I)/N,C(I)/N 

NEXT I 

PRINT"- 

PRINT "-" 

PRINT "TOTALS";TAB(34);C(N1);TAB(50);C(N1)/N 
RETURN 

. END OF SUBROUTINE . 

REM 

REM . SUBROUTINE FREQUENCY . 

GOSUB 2330 

LET Dl=INT(F9/60)+1 

PRINT 

PRINT 

PRINT 

PRINT TAB(26); "FREQUENCY HISTOGRAM" 

PRINT 

PRINT "MIDPOINT";TAB(20);"FREQUENCIES» 

PRINT 

FOR I = 1 TO N1 

LET N2 = INT(F(I)/Dl+.5) 

PRINT M(I);TAB(12); 

(continued) 
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(program continued) 

1830 FOR J = 1 TO N2 

1840 PRINT 

1850 NEXT J 

1860 PRINT 

1870 NEXT I 

1880 RETURN 


189 0 REM. END OF SUBROUTINE 

1900 REM 

1910 REM. SUBROUTINE S SEQUENTIAL 


1920 LET L = 1 

1930 LET R = N 

1940 LET S = 0 

1950 IF R - L < 1 THEN 2250 

1960 LET I = L 

1970 LET J = R 

1980 LET K = X(L) 

1990 IF K>=X(J) THEN 2020 

2000 LET J = J - 1 

2010 GOTO 1990 

2020 IF I<J THEN 2040 

2030 GOTO 2140 

2040 LET X(I) = X(J) 

2050 LET X(J) = K 

2060 LET I = 1 + 1 

2070 IF I<J THEN 2090 

2080 GOTO 2140 

2090 IF K>X(I) THEN 2060 

2100 LET X(J) = X(I) 

2110 LET X(I) = K 

2120 GOTO 2000 

2130'REM STACK THE DATA 

2140 LET S = S + 1 

2150 IF I - L < R - I THEN 2200 

2160 LET L(S) = L 

2170 LET R(S) =1-1 

2180 LET L = 1+1 

(continued) 
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(program continued) 


2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2480 

2490 

2500 


+ 1 


END OF SUBROUTINE 
SUBROUTINE MAXMIN 


GOTO 1950 
LET L(S) = I 
LET R(S) = R 
LET R = I - 1 
GOTO 1950 

REM FETCH FROM STACK 
IF S = 0 THEN 2300 
LET L = L(S) 

LET R = R(S) 

LET S = S - 1 
GOTO 1950 
RETURN 

REM . 

REM 

REM . 

LET Ml = X(1) 

LET M2 = X(1) 

FOR J = 2 TO N 
IF Ml >X(J) THEN 2400 
IF M2 < X(J) THEN 2420 
GOTO 2440 
LET Ml = X(J) 

GOTO 2440 
LET M2=X(J) 

NEXT J 
RETURN 

REM .... END OF SUBROUTINE . 

DATA 29 

DATA 69,10,30,88,20,80,75,60,70,40,45,55,88,99,100,71 

DATA 65,68,65,92,83,78,45,93,43,49,69,76 

END 
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The output of this program is as follows: 


OUTPUT 8.3 


DO YOU WANT INSTRUCTIONS ? YES 

THIS PROGRAM CREATES A FREQUENCY TABLE AND GRAPHS 
FREQUENCIES OF DATA. YOU CAN ENTER DATA EITHER 
THROUGH AN INPUT STATEMENT OR TYPE IT IN THE DATA 
STATEMENT STARTING AT LINE 2460. 

INSTRUCTIONS : WHEN REQUESTED, ENTER THE FOLLOWING 

INFORMATION 

1) THE NUMBER OF DATA POINTS (OBSERVATIONS) 

2) ANSWER 'YES' IF THE DATA HAS ALREADY BEEN 
TYPED IN THE DATA STATEMENT. ANSWER 'NO', IF 
THE DATA IS NOT TYPED. 

3) THE DATA MAY BE ENTERED IN ANY ORDER INTO 
THE DATA STATEMENT. HOWEVER, IF YOU WISH 

TO SEE THE DATA ORDERED IN DESCENDING ORDER, 

TYPE 'YES' WHEN PROMPTED. 

IF THE NUMBER OF OBSERVATIONS (DATA POINTS) IS GREATER 
THAN 500 OR THE NUMBER OF CLASS INTERVALS EXCEEDS 50, 
THEN CHANGE THE DIM STATEMENT IN LINE 20 TO THE SIZE 
YOU WANT. 

HAVE YOU TYPED THE DATA IN THE DATA STATEMENT ? YES 
DO YOU WANT TO SEE THE DATA IN SEQUENTIAL ORDER? YES 
YOUR DATA IN SEQUENTIAL DATA IS 


10 20 30 40 43 45 

72 75 76 78 80 83 


45 49 55 60 65 65 68 69 69 70 

88 88 92 93 99 100 


SMALLEST VALUE IS 10 
LARGEST VALUE IS 100 
RANGE IS 90 


DO YDTT WANT FREQUENCY TABLE ? YES 
ENTER THE^NUMBER OF FREQUENCY INTERVALS 
I? COU™ BE A NUMBER BETWEEN 5 AND 10? 5 
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CHAIN Statement 

Another method of module programming is to create 
separate programs and then link them together by the CHAIN 
statement. The CHAIN statement instructs the BASIC program 
to stop executing the current program at the point of the 
CHAIN statement, to load another program named in the CHAIN 
statement and to start executing it. The general form of 
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the CHAIN statement is: 


Ln CHAIN "program name", Lnl 


This statement consists of the line number (Ln), the 
keyword CHAIN, and the name of the program within the quotes 
to be executed; and Lnl is the line number in the chained 
program to be executed. If the Lnl is not specified, the 
chained program is executed from the beginning. For exam¬ 
ple. 


200 CHAIN "SORT" 


If this statement is in a BASIC program, upon the 
execution of this statement, the computer will load the 
program named SORT and will execute that program from the 
beginning. However, if you intend to start the execution of 
the program at line 200, the statement would look as fol¬ 
lows: 


200 CHAIN "SORT", 200 


In this statement, the computer loads the SORT program 
and starts the execution at line number 200. In order to 
call a program with the CHAIN, the program must exist 
somewhere on the disk. 

During the chaining process, the original program is 
replaced by the new program. Therefore, all variables de¬ 
fined in the old program are erased. However, if you want to 
transfer the values of the defined variables to the new 
program, simply add the word ALL at the end of the CHAIN 
statement. For example, 


200 CHAIN "SORT", ALL 
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or 

200 CHAIN "SORT",200, ALL 


Some of the BASIC versions do not use the ALL as a 
parameter in the CHAIN statement to transfer values to the 
new program. In that case, check the BASIC User Manual for 
an appropriate statement for transferring values. However, 
another most commonly used statement for this purpose is the 
COMMON statement. The general form of the common statement 
is : 


Ln COMMON varl, var2, .... 


This statement consists of a line number (Ln), the 
keyword COMMON, and the list of variables which are defined 
in the program but to be transferred to the new program. For 
example. 


10 COMMON A, B 
20 READ A, B 


190 DATA 100,.10 
200 CHAIN "SORT" 


10 REM PROGRAM SORT 


90 PRINT A, B 
100 END 
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In this example, the variables A and B are read in one 
program and transferred to another program. 

.. The following programs are complete programs showing 
the use of the CHAIN statement. 


PROGRAM 8.4 

10 REM . PROGRAM : INSTR. 

20 REM 

30 DIM X(500),F(50),M(50),B(50),C(50) 

40 REM X() IS FOR READ DATA, F(I) IS FOR FREQUENCIES 
50 REM C() IS FOR CUMULATIVE FREQUENCIES 
60 REM M () IS MIDPOINTS OF CLASS INTERVALS 
70 REM R () IS FOR CLASS LIMITS 
80 LET B1$="PLEASE ANSWER YES OR NO" 

90 PRINT "DO YOU WANT INSTRUCTIONS"; 

100 INPUT D$ 

110 IF D$="NO" THEN 160 
120 IF D$="YES" THEN 150 
130 PRINT Bl$ 

140 GOTO 100 
150 GOSUB 340 
160 Z$="NO" 

160 C1=0 
170 PRINT 

18 0 PRINT " HAVE YOU TYPED THE DATA IN THE DATA STATEMENT 
190 INPUT A$ 

200 IF A$="YES" THEN 260 

210 IF A$="NO" THEN PRINT DO YOU WANT TO INPUT THE DATA "; 
220 INPUT Z$ 

1 230 IF Z$="NO" THEN GOSUB 340 
240 PRINT 

250 PRINT "ENTER THE NUMBER OF DATA POINTS 

260 IF Z$="NO" THEN READ N ELSE INPUT N 

270 IF Z$="YES" THEN PRINT "ENTER ONE NUMBER AT A TIME" 

280 FOR 1=1 TO N 

290 IF Z$="NO" THEN READ X(I) ELSE INPUT X(I) 

(continued) 
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300 

310 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 


(program continued) 

LET C1=C1+1 
NEXT I 

CHAIN "SEQ",ALL 

PRINT "THIS PROGRAM CREATES A FREQUENCY TABLE AND GRAPHS" 
PRINT "FREQUENCIES OF DATA. YOU CAN ENTER DATA EITHER 
PRINT "THROUGH AN INPUT STATEMENT OR TYPE IT IN THE DATA" 
PRINT "STATEMENT STARTING AT LINE 2460." 

PRINT " " 

PRINT "INSTRUCTIONS : WHEN REQUESTED, ENTER THE FOLLOWING" 


PRINT " 
PRINT " 
PRINT " 
PRINT " 
PRINT " 
PRINT " 
PRINT " 
PRINT " 
PRINT " 


1 ) 

2 ) 


3) 


INFORMATION" 

THE NUMBER OF DATA POINTS (OBSERVATIONS)" 
ANSWER 'YES' IF THE DATA HAS ALREADY BEEN" 
TYPED IN THE DATA STATEMENT. ANSWER 'NO', IF" 
THE DATA IS NOT TYPED." 

THE DATA MAY BE ENTERED IN ANY ORDER INTO" 
THE DATA STATEMENT. HOWEVER, IF YOU WISH" 

TO SEE THE DATA ORDERED IN DESCENDING ORDER," 
TYPE 'YES' WHEN PROMPTED." 

PRINT"IF THE NUMBER OF OBSERVATIONS(DATA)IS GREATER" 
PRINT"THAN 500 OR THE NUMBER OF CLASS INTERVALS EXCEEDS50" 
PRINT"THEN CHANGE DIM STATEMENT IN LINE 20 TO THE SIZE" 
PRINT"YOU WANT. THE PROGRAM REQUIRES DATA. PLEASE RUN THE" 
PRINT "AGAIN ACCORDING TO THE INSTRUCTIONS." 

IF Z$="NO" THEN END 
DATA 29 

DATA 69,10,30,88,20,80,75,60,70,40,45,55,88,99,100,71 

DATA 65,68,65,92,83,78,45,93,43,49,69,76 

END 
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10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 


PROGRAM 8.5 

n?M progr am : small .... 

LET M1=X(1) F(50) ' M(50) ' B ( 5 °),C(50) 
LET M2=X(N) 

REM DETERMINE THE VALUE 
IF X(l)>= THEN 100 
IF ABS(10*X(1))<X(N) THEN 100 
LET X9=X(1) 

GOTO 120 
LET X9=X(N) 

IF C1<N THEN 130 

LET L=L-3 

LET N9=INT(72/L) 

LET N8=INT(N/N9)+1 

FOR 1=1 TO N8 

FOR J=1 TO N9 

IF N9*(1-1)+J>N THEN 200 

NEXT J 

NEXT I 

PRINT 

"SMALLEST VALUE IS " ;M1 
"LARGEST VALUE IS ";M2 
"RANGE OF THE DATA IS ";M2-M1 


PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

INPUT 


"DO 

Y$ 


YOU WANT FREQUENCY TABLE " 


IF Y$="YES" 
END 


THEN CHAIN "FREQ" 
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10 

20 

30 

40 

50 

60 

70 

30 

90 

100 

110 

120 

130 

140 

150 

160 

170 

130 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 


PRROGRAM 3.6 

PPM . PROGRAM : FREQ • • • * * ** * 

DIM X(500),F(50),M(50),3(50)^C(50) 20 P'_ „ 

PRINT " ENTER THE NUMBER OF 10" 

PRINT ” IT COULD BE A NUMBER BETWEEN 

INPUT HI 
D = (M2-M1)/N1 
B(1) = Ml 

REM TO SET UP LIMITS 
FOR I = 2 TO Nl+1 
LET B(I) = B(I-1)+D 
NEXT I 

REM TO DETERMINE CLASS FREQUENCIES 

FOR I = 1 TO N 
FOR J = 2 TO Ml + 1 
IF X(I)>B(J) THEN 180 
LET F(J-l)=F(J-1)+1 
GOTO 190 
NEXT J 

RElf determines class midpoints and cumulative 

FOR I = 1 TO N1 
LET M(I) = B(I)+B(I+l))/2 
LET C(I) = C(I-l) + F(I) 

NEXT I 

PR?N? "TO YOU WANT A FREQUENCY HISTOGRAM”; 

INPUT d$ 

if DS="NO" THEN 910 
IF D$="YES" THEN GOSUB 310 

GOTO 910 

JEM SUBROUTINE S FREQUENCY 

REM . 

GOSUB 750 


FREQUENCIES 


(continued) 
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340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 


(program continued) 


LET D1=INT(F9/60)+1 
PRINT 
PRINT 
PRINT 

PRINT TAB(26); "FREQUENCY HISTOGRAM" 

PRINT 

PRINT "MIDPOINT";TAB(20);"FREQUENCIES" 

PRINT 

FOR I = 1 TO Ni 

LET N2 = INT(F(I)/Dl+.5) 

PRINT M(I);TAB(12); 

FOR J = 1 TO N2 

PRINT 

NEXT J 

PRINT 

NEXT I 

RETURN 

REM . END OF SUBROUTINE . 

REM . SUBROUTINE : PRINTING . 

PRINT 

PRINT 

REM FRENQEUNCY TABLE 

PRINT TAB(26);"FREQUENCY DISTRIBUTION" 

PRINT 

PRINT TAB(43):"CUM";TAB(52);"REL";TAB(64);"REL CUM" 
PRINT TAB(5);"CLASS LIMITS"; 

PRINT TAB(22);"MIDPOINTS";TAB(34);"FREQ";TAB(43); 
PRINT "FREQ";TAB(52); "FREQ";TAB(64); "FREQ"; 

PRINT "-- 

PRINT "- 

FOR I = 1 TO Nl 

JSS SSOT! ItaboI; VAX ;tab( 43, ;c( i), 

PRINT USING"*#.<» ###.###";F(I)/N,C(I)/N 

NEXT I 


(continued) 


219 


Scanned by CamScanner 















Chapter 8 



(program continued) 

700 PRINT -- 

710 PRINT "-" 

720 PRINT "TOTALS";TAB(34);C(N1);TAB(50);C(N1)/N 
730 RETURN 

740 REM . END OF SUBROUTINE . 

750 REM . PROGRAM MAXMIN . 

760 LET Ml = X(l) 

770 LET M2 = X(l) 

780 FOR J = 2 TO N 

790 IF Ml >X(J) THEN 820 

800 IF M2 < X(J) THEN 840 

810 GOTO 850 

820 LET Ml = X(J) 

830 GOTO 850 
840 LET M2=X(J) 

850 NEXT J 
860 RETURN 

870 REM _ END OF SUBROUTINE . 

880 END 


PROGRAM 8.7 

10 REM . PROGRAM ! SEQ • • • • 

30 DIM X(500),F(50),M(50),B(50),C(50) 
30 LET L = 1 
40 LET R = N 
50 LET S = 0 

60 IF R - L < 1 THEN 350 
70 LET I =L 


(continued) 
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80 

'let j = R 

(program continued) 

90 

let K = x(L) 


100 

IF K>=X(J) THEN 120 


110 

LET J = J - i 


120 

GOTO 90 


130 

IF I<J THEN 140 


140 

GOTO 240 


150 

LET X (I) = X (J) 


160 

LET X (J) = K 


170 

LET I = I+l 


180 

IF I<J THEN 190 


190 

GOTO 240 


200 

IF K>X(I) THEN 140 


210 

LET X(J) = X(I) 


220 

LET X(I) = K 

1 

230 

GOTO 100 


240 

REM STACK THE DATA 


250 

LET S = S + 1 


260 

IF I — L < R - I THEN 

300 

270 

LET L(S) = L 


280 

LET R (S) =1-1 


290 

LET L = I+l 


300 

GOTO 50 


310 

LET L(S) =1 + 1 


320 

LET R(S) = R 


330 

LET R = I - 1 


340 

GOTO 50 


350 

REM FETCH FROM STACK 


360 

IF S = 0 THEN 400 


370 

LET L = L(S) 


380 

LET R = R(S) 


390 

LET S = S - 1 


400 

GOTO 50 


410 

PRINT "DO YOU WANT TO 

SEE THE DATA IN ASCENDING ORDER"; 

420 

INPUT B$ 




(continued) 
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430 

IF B$="NO" THEN CHAIN "SMALL" 

(program continued) 

440 

IF B$="YES" THEN 460 


450 

PRINT Bl$ 


460 

GOTO 410 


470 

PRINT 

ORDERED IS " 

480 

PRINT "YOUR DATA IN SEQUENTIAL 

490 

PRINT 


500 

REM ** TO PRINT ORDERED DATA 


510 

FOR I = 1 TO N 


520 

PRINT X(I); 


530 

NEXT I 


540 

CHAIN "SMALL" 


550 

END 



These programs have to be entered and saved as sepa 
rate files (programs) . We need to load and run the main 
program only. The main program then calls the other programs 
when needed. The output of these program will be same as 
shown in Output 8.3. 
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QUESTIONS 

1. Define a function. What are the differences between a 
built-in function and a user-defined function? 

2. What are mathematical built-in functions used for? 

3. Show the results of the following mathematical functions: 

SQR (100) 

FIX ( 45.79) 

INT ( 6.99) 

SGN (-9098) 

4. Write a program that generates 100 3-digit random inte¬ 
gers (fixed-decimal or whole) numbers. 

5. What does the statement RANDOMIZE do? 

6. Show the results of the following string functions: 

LEFT$ ("PESHAWAR", 6) 

RIGHT$ ("PESHAWAR", 6) 

MID$ ("PUNJAB", 3, 3) 

LTRM$ (" SIND ") 

RTRM$ (" SIND ") 

LPAD$ ("SIND", 10) 

RPAD$ ("BALUCHISTAN", 15) 

RPAD$ ("NAME", 3) 

LEN ("BASIC") 

POS ("BALUCHISTAN", "T», 5) 

UPRC$ ("pakistan") 

LWRC$ ("PAKISTAN") 

7. correct errors, if any, in the following user-defined 

functions. 

a) DEF FNP (PI) = P + P *- 03 


READ X 

B = FNP (X) 
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b) DEF FND (PI) = PI + PI * .03 
READ X 

B = FND (X) 

C) DEF FND 

READ X 

B = FND (X) 


8. What is a subroutine? What are the differences between a 
subroutine and a user-defined function? 

9. What is a main program? What is the purpose of a main 
program? 

10. Write a program which reads names and gross pay for each 
employee, and prints the names, gross pay, retirement 
and income tax deductions, and net pay. However the 
program should use a subroutine to calculate the tax 
amount using the following table. 


INCOME 

PER 

MONTH 

TAX 

RATE 

0 

— 

1000 

0 

% 

1001 

- 

2000 

2 


2001 

- 

3000 

5 


3001 

- 

4000 

10 


4001 

- 

5000 

15 


5001 

- 

8000 

25 


8001 

and 

over 

35 



224 


Scanned by CamScanner 




Chapter 8 


Add another subroutine to calculate the retirement deduc¬ 
tions using the following table. 


INCOME 

PER 

MONTH 

RETIREMENT RATE 

Rs. 0 

— 

1000 

0 % 

1001 

- 

2000 

1 

2001 

- 

3000 

2 

3001 

- 

4000 

3 

4001 

- 

5000 

4 

5001 

- 

8000 

5 

8001 

and 

over 

6 

However, once a person 

has had 

deducted a total of Rs. 

5,000 per year for 

the 

retirement fund, there should be 

no more deduction for that year. 


Write subroutines, 

one 

for each. 

for calculating a mean. 


a median, a standard deviation, and a freguency table 
of grades of any number of students, but not to exceed 
200 . 


12. What is the chain statement used for? 

13. What are the differences between a subprogram and a 
subroutine? 

14. Write subprograms using Question 10. 

15. Write subprograms using Question 11. 

16. Write a subprogram that sorts the data of any program. 


225 


Scanned by CamScanner 




Chapter 8 


17 * sp rreC £ errors ' any, in the following program 

a) 10 A1 = 90 
i 20 END 

30 GOSUB 400 

40 IF Al> 90 THEN PRINT "A" 


60 RETURN 
90 END 

b) 10 A1 = 90 
20 GOSUB 40 
3 0 END 

40 IF Al> 90 THEN PRINT "A" 


60 RETURN 
90 END 

C) 10 A1 = 90 
20 GOSUB 40 

40 IF Al> 90 THEN PRINT "A" 


60 RETURN 
90 END 
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18. Write a program that reads salespersons' names, amount 
sold, and hours worked during a week. Write a subrou¬ 
tine that calculates the commission based on the fol¬ 
lowing table. 


HOURS WORKED 

AMOUNT SOLD COMMISSION RATE 

PLUS 

OVERTIME 

PER WEEK 


PER WEEK 

AND BASE PAY RATE ON 

THE BASE 

0-20 

Rs. 

1000 - 2000 

10 % 

plus 

Rs. 

500 




2001 - 3000 

15 

plus 

Rs. 

500 




3001 - 5000 

20 

plus 

Rs. 

500 




5000 - 8000 

25 

plus 

Rs. 

500 




8000 and over 

30 

plus 

Rs. 

500 


21 - 40 

Rs. 

1000 - 2000 

5 % 

plus 

Rs. 

1000 




2001 - 3000 

8 

plus 

Rs. 

1000 




3001 - 5000 

11 

plus 

Rs. 

1000 




5000 - 8000 

14 

plus 

Rs . 

1000 




8000 and over 

16 

plus 

Rs. 

1000 


41 - 50 

Rs. 

1000 - 2000 

5 % 

plus 

Rs. 

1000 




2001 - 3000 

8 

plus 

Rs. 

1000 




3001 - 5000 

11 

plus 

Rs. 

1000 




5000 - 8000 

14 

plus 

Rs. 

1000 




8000 and over 

16 

plus 

Rs. 

1000 


51 and over 

Rs. 

1000 - 2000 

5 % 

plus 

Rs. 

1000 

5 % 



2001 - 3000 

8 

plus 

Rs. 

1000 

6 



3001 - 5000 

11 

plus 

Rs. 

1000 

7 



5000 - 8000 

14 

plus 

Rs. 

1000 

8 



8000 and over 

16 

plus 

Rs. 

1000 

9 


Write another subroutine that prints all the informa¬ 
tion that is read (inputted) and the calculated 
commission amount, the base pay, and the total pay. 

19. Write subprograms using Question 18. 

20. What is the Common statement, and when will you use it? 
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FILE MANIPULATION 


INTRODUCTION - FILE 


So far we read and processed data as a part of a 
program. But after the program was run, the same data or the 
processed data was not available for other programs to 
process. That is, every time a program was run, the data was 
read from the DATA statement or inputted every time. In 
business or non-business situations, it is not feasible to 
enter ^ large quantity of data for each program or to be 
made a part of a program to be read every time the program 
is executed. Further, the same data may be needed by other 
programs. Therefore, the same data must be entered or saved 
as a part of each program. This is either economical nor 
convenient. Therefore, large quantities of data needed by 
programs should be stored separately on a secondary storage 
device (such as a disk or diskette or tape). It does not 
matter whether the stored data is entered initially or 
generated by a program. It is economical and convenient to 
store data on a storage device. Data stored on a storage 
device is stored under a file name. A file is a collection 
of related records. A record consists of related fields. A 
field is a set of characters (alphabets and/or digits). The 
following figure shows the relationship between characters 
and field, fields and record, and records and file. 
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FIGURE 9.1 


Character 

Field 



Alphabet or Digit 


Set of Characters 


Record 


Field 1 

Field 2 

Field 3 


Field n 


Set of 
fields 


File 

Record 1 
Record 2 
Record 3 
Record 4 


Field 


Field 1 


Field 2 
Field 2 


Field 3 
Field 3 



Field n 


Field n 


Set of 
record 


Field 1 

Field 2 

Field 3 


- 1 “1 

Field n 

Field 1 

Field 2 

Field 3 


Field n 


For example, the following records make up a file. The 
file contains information about students. That is, each 
record contains information about a student. There are 
fifteen records in this file. Each record consists of six 
fields. The field names are : ID, FIRST NAME, AGE, MARITAL 
STATUS, MAJOR, and CREDIT HOURS. Each field consists of 
characters or digits. For example, field ID consists of 
four digits, and field FIRST NAME consists of alphabets. 
Since the file contains records of the students, it will be 
named as STUDENT file. 
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TABLE 9.1 

File Name : STUDENT 


FIELD NAMES 


RECORD 

ID 

FIRST 

NAME 

AGE 

MARITAL 

STATUS 

MAJOR 

CREDIT 

HOURS 

1 

7736 

Bobbi 

21 

U 

MIS 

15 

2 

9753 

Carol 

20 

M 

MGT 

18 

3 

4283 

Connie 

22 

M 

MIS 

12 

4 

6699 

Dianne 

21 

U 

ACC 

15 

5 

3750 

Doug 

22 

M 

MIS 

12 

6 

4321 

Jane 

22 

M 

MGT 

15 

7 

0123 

Jeff 

22 

M 

MIS 

12 

8 

1111 

John 

22 

M 

MIS 

12 

9 

1006 

Julie 

21 

U 

MGT 

12 

10 

1122 

Kim 

22 

M 

MIS 

12 

11 

2048 

Kris 

22 

U 

MIS 

18 

12 

9110 

Patrick 

22 

U 

ACC 

12 

13 

9462 

Ricit 

22 

U 

MIS 

15 

14 

4461 

Rod 

29 

U 

ACC 

06 

15 

5612 

Susan 

21 

u 

MIS 

16 


Marital Status codes: U = Unmarried M = Married 
Major codes : MIS = Management Information System 

MGT = Management, ACC = Accounting 


Usually, each record in a file has one field that 
uniquely identifies that record. This field is referred to 
as a primary key field. The purpose of a primary key field 
is to retreive a specified record in the file. For example, 
the ID numbers in the ID field are different in each record. 
Therefore, the ID field will be used as a primary key field 
in this file. 

Data stored in a file is written and retrieved one 
record at a time. Records in a file can be stored sequen¬ 
tially or non-sequentially. However, a sequential file 
requires sorting records before storing them. That is, 
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£ho°c d o S ~„ ln ® s eq uent ial file are stored one after another in 
qu .® ntlal order of the key. Therefore, to access a 
.. ' 4 . • T . COTn P u ^ er has to read each record one after the 

other u J»til it finds the record you want. The advantage of a 
sequen lal file is that all records can be listed in a 
sequence of the primary key. 


In a consequential file, records are stored in any 
order. However, to access a record requires the same proce¬ 
dure as in the sequential file. That is, each record has to 
be read and compared with the key of the record you want. 
Another form of nonsequential record is a random file. In a 
random file, records are identified by numbers(address). One 
of the methods for creating a random file is to number the 
records as they are entered. The first record entered is 
number 1, the second record is number 2, and so on. However, 
some BASICS cannot create and access a random file. To 
create a random access requires a different method. 


There are three operations which may be performed on a 
data file: 

1. Creating a file (storing a file on a disk) 

2. Updating a file (adding/deleting/changing records in an 

existing file) 

3. Accessing a file (locating records in a file) 


FILE STORAGE : Sequential and Nonsequential File 


Creating a file requires these steps: 

1. Opening a file requires informing the computer about the 
name of the file. The computer needs this name to create 
a space on a disk for storing the data. There is a 
special form to the statement for opening a file. 

2 Writing a record into the file requires that we input 
value for each field in a record, and then tell the 
computer to write it in the file. There is a special form 
to the statement for writing a record. 
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3. Closing a file also requires a special statement. When 
writing records into a file is completed, you must close 
the file. 


Reading a file requires these steps: 

1. Opening a file requires informing the computer about the 
name of the file. The computer needs this name to locate 
the storage space on the disk where the file was origi¬ 
nally stored. There is a special form to the statement 
that opens a file. 

2. Reading a record requires that we read all fields in a 
record (the whole record), and then process each field. 
There is a special form to the statement for reading a 
record. 

3. Closing a file requires a special statement. When you 
have finished reading records from a file, you must close 
the file. 


We will be following all these steps in this chapter. 


OPEN Statement 

Since BASIC is meant to function in an interactive 
environment, files will be stored on a disk or a diskette. 
Files can be created through a program or created by input¬ 
ting data directly from the keyboard. Regardless of the 
manner of data input, the computer has to be informed that a 
file is being created. The general form of the statement is: 

Ln OPEN "filename" FOR INPUT or OUTPUT AS FILE #channel numbe 
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K e v WO H hl nppM ta f te 1 T nt consists of the line number (Ln) , the 
fi lpnamo followed by the file name within quotes. The 

is folloupH 1 S VL lng ° f up to 8 characters. The file name 
INPUT W hG ke y words FOR and INPUT or OUTPUT. The 
used when v™, WhGn Y ° U ai : e readin< 3 a file, and the OUTPUT is 
OUTPUT is fV! ^ reatln ^ (writing) a file. The INPUT or 
followed bv the n thG k *y* ords AS FILE- The word FILE is 
ten which is thpn^ 6 !) ^ lgn ^ and a number between one and 
fUe The USed later in the P rogran > to refer to the 
be assigned ^ th,°t^-f SSlgned t0 a file in a Program would 
f?om ?he orimarv f flle Untl1 the file is closed cleared 
OPEN Statement^ould^be• “'"P 1 *' t0 Create 3 file - the 


10 OPEN "student" FOR OUTPUT AS FILE #1 


hhis statement, line number 10 opens the file 

nul^ f° r ° UtPUt and aSSigns the channel dumber (reference 
S - 1 ' We f an only write data into this file since i? is 
„ output. However, a file should be opened with 
INPUT when you want to read a file. p a Wlth 

There are many versions of BASIC and each version has 
its own statement for files. Refer to Table 9 2 for 
appropriate OPEN statement for your system. Also, check vou? 
system s BASIC manual for an appropriate file statement For 
example, the IBM personal computer (PC) BASIC uses tho 
following statement for opening a file. the 


Ln OPEN "filename" FOR INPUT or OUTPUT AS channel number 


In this statement, the statement number is fol Iowph l. 
the keyword OPEN and the file name within quotes. The fii 
name is followed by the keywords FOR and either input « 
OUTPUT. The INPUT or OUTPUT word is followed the keywords 
AS FILE and the channel number without a number (#) sign 
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For example, to open the Student file for output, 
ment is: 

10 OPEN "student" FOR OUTPUT AS FILE 1 

in this statement, the file Student is opened for 
output (writing). 

Some other versions of the OPEN statement are listed 
in Table 9.2. 

TABLE 9.2 

OTHER VERSIONS OF OPEN STATEMENT 

STATEMENT 

Ln OPEN FILE fnumber ="filename" 

Ln OPEN "filename" FOR INPUT or OUTPUT AS 
FILE Inumber 

Ln OPEN Inumber:NAME "filename", ACCESS INPUT 
or OUTPUT, ORGANIZATION SEQUENTIAL 

Ln OPEN "I" or "O", Inumber, "filename" 

Ln OPEN "filename" FOR INPUT or OUTPUT AS 
FILE Inumber 

Ln OPEN "filename" IN or OUT or ALL 

(When a file is to be used for both input 
and output, use ALL) 

NOTE* When a word is capitalized, you must use that word exactly. 
In cases where the word "or" is indicated between words, 
you should choose one or the other keyword but not both. 
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CLOSE Statement: 


the tennin;fh ivfrf °P^!? ec ^ ; *' n a Program must be closed before 

ment I™ a closing TnlllT' * e " eral ° f a state ’ 


Ln CLOSE #channel number 


keywordcL)SP f" slsts of the line number (Ln) , the 

boosed uft by the channel number. All files can 
channel numbers one , CL0SE statement by listing all the 
file lould have associated with the opened files, or each 
lie could have a separate close statement. For example. 


10 


CLOSE 


u 1 
ir X 


If you have opened more than one file, 
statement could be used to close all files. 


the following 


100 CLOSE #1, #2, #3 
or 


100 

CLOSE 

#1 

110 

CLOSE 

#2 

120 

CLOSE 

#3 


or 


100 

CLOSE 



This last statement without a channel 
close all opened files. 


number will 
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However, for IBM's VS BASIC, the CLOSE statement is: 


100 CLOSE "filename" (IBM's VS BASIC) 


In this statement, the name of file to be closed must 
be identified, and not the channel number. 


CREATING A FILE : PRINT Statement 


Once a file is opened for output, you may want to 
write data into it. The following is the general form of 
PRINT (Write) statement which will write data into an output 
file. 


Ln PRINT fchannel number, variables list 

or 

Ln WRITE ^channel number, variables list 

In this statement, the line number (Ln) is followed by 
the keyword PRINT (or WRITE for some systems) and a channel 
number and a comma. The comma is followed the names of the 
variables to be written into the file. For example, to write 
a record of the file in Table 9.1, the statement is: 


10 PRINT n,I,N$,A,S$,M$,C 
or 

10 WRITE #1,I,N$,A,S$,M$,C 

This statement writes six variables, I (ID), N$ 
(NAME), A (AGE), S$ (MARITAL STATUS), M$ (MAJOR), C (CREDIT 
HOURS) for each record in the file assigned to channel 

number 1. 
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As mentioned previously, some BASICS might use a 
different form for writing data into a file. Refer to Table 
9.3 for an appropriate PRINT (WRITE) statement for your 
system. Also, check your BASIC manual for an appropriate 
form of the statement. For example, the general form of 
PRINT statement for IBM PC is: 


Ln PRINT #1,varl;",";var2;",";var3 

In this statement, each variable name except the last 
one is followed by a comma enclosed within guotes. In this 
statement, the comma is a delimiter. A delimiter indicates 
to the computer where the value of a variable ends. In 
addition, the variable names are separated by semicolon (;) 
rather than a comma. For example, to write a record of the 
i n Table 9.1, the statement is: 


10 PRINT #1,1;" 


" ;N$;",";A;",";S$;",»;M$;",";C 


Iri this example, variable I is followed by a comma 
within quotes and so are the other variables except the last 
variable C. 

Some other versions of the PRINT statement are listed 
in Table 9.3. 


TABLE 9.3 

OTHER VERSIONS OF THE PRINT STATEMENT 
SYSTEM STATEMENT 


CDC BASIC 
BASIC 'PLUS 
ANSI BASIC 
Microsoft BASIC 
Digital BASIC 
VS BASIC 


Ln 

PRINT 

#number, 

variables 

list 

Ln 

PRINT 

#number, 

variables 

list 

Ln 

PRINT 

#number: 

variables 

list 

Ln 

PRINT 

#number, 

variables 

list 

Ln 

PRINT 

#number, 

variables 

list 

Ln 

PUT 

filename" 

, variables 

list 
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NOTE: When a word is capitalized, you must use that or 
exactly. The variables list means the names of the 
fields to be written into the file. 

CREATING A NON- SEQUENTIAL FILE 

To show how to create a nonsequential, file for the 
above student records in Table 9.1, let us write a program. 


PROGRAM 9.1 


10 

20 

30 

40 


REM TO CREATE STUDENT FILE 

OPEN "STUDENT" FOR INPUT AS FILE #1 

FOR K = 1 TO 100 

PRINT "TYPE ZEROS FOR ALL VARIABLES TO STOP THE PROGRAM 
PRINT "TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

PRINT " NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS" 

INPUT I,N$,A,S$,M$,C 
IF 1=0 THEN 110 
PRINT #1,I,N$,A,S$,M$,C 
NEXT K 
CLOSE #1 

PRINT " YOUR FILE IS NOW CREATED" 

END 


In this program, statement 20 opens the file named 
STUDENT and assigns it the number 1. The loop starts in line 
30. In line 70, the data is to be entered from the keyboard. 
Line 80 checks to see if zeros are entered. If there are 
zeros, the computer closes the file. As long as zeros are 
not entered, the computer asks for up to 100 records and 
writes the records into the file. 
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When this program is executed, 
as follows. ' 


tho screen would 


OUTPUT 9.1 

otv 0 ?,» F0r all SIX variables TO STOP THE PROGRAM 
MrMi7 SIX * VALUES ' ° NE F0R EACH VARIABLE: ID, 

, N „,,' A J* E ' MARITAL status, major, credit hours 
? 7736,Bobbi,21,U,MIS,15 

ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
T ^ E SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 9753,Carol,20,M,MGT,18 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 4283,Connie,22,M,MIS,12 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 6699,Dianne,21,U,ACC,15 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 3750,Doug,22,M,MIS,12 


TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 4321,Jane,22,M,MGT,15 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 0123,Jeff,22,M,MIS,12 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 1111, John,22,M,MIS,12 


(continued) 
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OUTPUT 9.1 (continued) 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: I D, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT ° 

? 1006, Julie, 21,U,MGT, 12 m , nr n AM 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT H 

? 1122,Kiin, 22,M,MIS, 12 „ mlI _ DDnrDAM 

TYPE ZEROS FOR ALL SIX VARIABLES TO STOP THE 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HO > 

? 0 , 0 , 0 , 0 , 0,0 


YOUR FILE IS NOW CREATED 


READING A FILE : INPUT statement 


Once a file is created, it can be read later ln th 
same program or by other programs. However, all flles Jr° 
read or to be written must be opened first. Once opened 
input, to read a file, the general statement for reading a 

record in a file is: 


Ln INPUT ^channel number, variables list 

or 

Ln GET "filename", variables list (IBM's VS BASIC) 


In statement 1, the line number (Ln) is followed by a 
keyword INPUT and a channel number. The channel number is 
followed by a comma and a list of variables (fields) in the 
record. For example, to read a record in the above file: 


30 INPUT if 1, I, N$, A, S$, M$, C 
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, u 1 This stat ® m ®nt reads the six fields (I,N$,A,S$,M$,C) 
(whole record) in the file assigned to cha nnel number 1. 

Let us create a program that reads and prints all the 
records in the file we created. 


PROGRAM 9.2 

10 REM TO READ THE STUDENT FILE 
20 OPEN "student" FOR INPUT AS 
30 FOR 1=1 TO 100 
40 INPUT #1, I,N$,A,S$,M$,C 
50 PRINT I,N$,A,S$,M$,C 
60 NEXT I 
70 CLOSE #1 
8 0 END 


#1 


Notice that line 20 in the above program opens the 
file created in Program 9.1 for input. Line 40 reads the six 
fields (whole record) in each record, and line 50 prints 
them. However, once there are no more records in the file, 
the computer will print an error message indicating the End 
of File (EOF) and will stop executing the program. This is 
an abnormal termination of the file. For example, the output 
of the program is as follows: 


OUTPUT 9.2 

7736,Bobbi,21,U,MIS,15 
9753,Carol,20,M,MGT,18 
4283,Connie,22,M,MIS,12 
6699,Dianne,21,U,ACC,15 
3750,Doug,22,M,MIS,12 
4321,Jane,22,M,MGT,15 
0123,Jeff,22,M,MIS # 12 
1111,John,22,M,MIS,12 
1006,Julie,21,U,MGT,12 
1122,Kim,22,M,MIS,12 
INPUT PAST END IN LINE 40 
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In this output, the last line is an error message 
indicating that there is no data available to be read. In 
order to avoid the abnormal termination, it is better to 
check for the end of the file. The format of the statement 
is: 


Ln IF END #channel number THEN statement number 


In this statement, the line number is followed by the 
keywords IF and END and a channel number. The channel 
number is followed by a statement number where the program 
will be transferred when the end of the file is reached. For 
example, 


40 IF END #1 THEN 90 


In this statement, the keywords IF and END are fol¬ 
lowed by the channel number 1 and the channel number is 
followed by the keyword THEN and the statement number 90. 
That is, when the file runs out of data, the program will 
transfer to statement 90. 

As indicated previously, not all BASICS follow the 
same format. Check your BASIC manual for an appropriate 
statement. For example, the IBM PC uses the following for¬ 
mat: 


Ln IF EOF(1) THEN statement number 


In this statement, the keyword IF is followed by the 
function EOF(l). The EOF function checks the file and when 
the file reaches the end, the computer returns the value of 
1 which makes the condition true and the IF-THEN condition 
is satisfied which causes the program to transfer to the 
specified statement number. 
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Le t us rewrite the above program to prevent an abnor- 
IT ' a ^ termination of the program. 



PROGRAM 9.3 



10 

REM TO READ AND CHECK THE 

END OF FILE 


20 

OPEN "student" FOR INPUT 

AS FILE #1 


30 

FOR 1=1 TO 100 



40 

IF END #1 THEN 80 



50 

INPUT #1, I,N$,A,S$,M$,C 



60 

PRINT 1,I,N$,A,S$,M$,C 



70 

NEXT I 



80 

CLOSE #1 



90 

END 




The output of the above program is as follows: 


OUTPUT 9.3 

7736,Bobbi,21,U,MIS,15 
9753 ,Carol,20,M,MGT,18 
4283,Connie,22,M,MIS,12 
6699,Dianne,21,U,ACC,15 
3750,Doug,22,M,MIS,12 
4321 ,Jane,22,M,MGT,15 
0123,Jeff,22,M,MIS,12 
1111, John,22,M,MIS,12 
1006 ,Julie,21,U,MGT,12 
1122,Kim,22,M,MIS,12 
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CREATING A SEQUENTIAL FILE 

For creating a sequential file, records are entered as 
usual. But before they are stored in a file, they must be 
sorted by a primary key. In order to create a sequential 
file, using the same data as entered in OUTPUT 9.1, let us 
write a program which reads and then sorts the data before 
storing it in the file. For example, 


PROGRAM 9.4 


10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 


REM TO CREATE STUD.ZNT SEQUENTIAL FILE 
REM TO CREATE AN ARRAY FOR SORTING DATA 
DIM Z(20),W$(20),B(20),H$(20), D$(20),G(20) 


FOR K 
PRINT 
PRINT 
PRINT 
INPUT 
IF I(K)=0 


= 1 TO 100 

"TYPE ZEROS FOR ALL VARIABLES TO STOP THE PROGRAM" 
"TYPE SIX VALUE, ONE FOR EACH VARIABLE: ID," 
"NAME, AGE, MARITAL STATUS, MAJOR, CREDIT HOURS" 

I(K),N$(K),A(K),S$(K),M$(K),C(K) 

THEN 100 


NEXT K 

OPEN "STUDENT" FOR OUTPUT AS FILE #1 

REM TO SORT RECORDS BEFORE WRITING THEM 

REM TO FIND RECORD WITH THE SMALLEST ID NUMBER 

FOR J= 1 TO K-l 

K1=I(J) 

L = J 

FOR R = J TO K-l 
IF K1>I(R) THEN L=R 
IF K1>I(R) THEN K1=I(R) 

NEXT R 

PRINT #1,I(L) ;N$(L);A(L);S$(L) ;M$(L) ;C(L) 

REM TO REARRANGE ARRAY BY MOVING SMALLEST ID TO THE TOP 

A1=I(J) 

Q$=N$(J) 

V =A(J) 


(continued) 
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PROGRAM 9.4 

(continued) 

260 

T$=S$(J) 


270 

U$=M$(J) 


290 

X = C(J) 


300 

I(J)=I(L) 


310 

N$(J)=N$(L) 


320 

A(J)=A(L) 


330 

S$(J)=S$(L) 


340 

M$(J)=M$(L) 


350 

C(J)=C(L) 


360 

I(L)=A1 


370 

N$(L)=Q$ 


380 

A (L) =V 


390 

S$(L)=T$ 


400 

M$(L)=U$ 


410 

C(L)=X 


420 

NEXT J 


430 

CLOSE #1 


430 

END 



In this program, the data is entered and stored in 
arrays and then sorted before being written into the file. 
Now if the file is read by the program, the output would 
look as follows: 


OUTPUT 9.4 

0123,Jeff,22,M,MIS,12 
1006,Julie,21,U,MGT,12 
1111 ,John,22,M,MIS,12 
1122,Kim,22,M,MIS,12 
2048,Kris,22,U,MIS,18 
3750,Doug,22,M,MIS,12 
4 283,Connie,22,M,MIS,12 
4321,Jane,22,M,MGT,15 
6699,Dianne,21,U,ACC,15 
7736,Bobbi,21,U,MIS,15 
9753,Carol,20,M,MGT,18 
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Notice that the records are listed in the order of the 
ID numbers. 


UPDATING A FILE : APPEND Statement 


After you create a file, it may be necessary to add 
records to the same file. However, once you close the file 
and open it again for output, new records are written at the 
beginning of the file, deleting the old records. That is, it 
creates a new file. Therefore, to add additional records to 
the end of the file, you must inform the computer to open 
the file for output and move to the end of the file. The 
general form of the statement is: 

1) Ln OPEN "filename" FOR APPEND AS FILE ^channel number 

or 

2) Ln OPEN "filename" OUTPUT REUSE (IBM's VS BASIC) 


In statement 1, the keyword APPEND is used. The file 
is opened for output, and the file name is followed by the 
keyword APPEND indicating that you want to add records to 
the end of the file. For example, 


10 OPEN "student", FOR APPEND AS FILE #1 

Let us write a program to add additional records to 
the STUDENT file. 
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PROGRAM 9.5 


10 REM TO UPDATE THE STUDENT FILE 
20 OPEN "STUDENT" FOR APPEND AS FILE #1 
30 FOR 1=1 TO 100 

4 0 PRINT "TYPE ZEROS FOR ALL VARIABLES TO STOP THE PROGRAM" 
50 PRINT "TYPE SIX VALUES, ONE FOR EACH VARIA3LE: ID, " 

60 PRINT " NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS" 
70 INPUT I,N$,A,S$,M$,C 
80 IF 1=0 THEN 110 
90 PRINT #1,I,N$,A,S$,M$,C 
100 NEXT I 
110 CLOSE #1 
120 END 


In this program, statement 20 opens the file named 
STUDENT for output and assigns it the number 1. Line 80 
checks to see if zeros are entered. If there are zeros, the 
computer closes the file and stops the program. As long as 
zeros are not entered, the computer asks for more records 
and writes the records at the end of the file. 

When this program is executed, the screen would look 
as follows. 


(next page) 
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OUTPUT 9.5 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 

? 2048, Kris , 22 ,U,MIS,18 „ 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 

TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 9110,Patrick,22,U,ACC, 12 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 9462,Ricit,22,U,MIS,15 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 4461,Rod,29,U,ACC, 06 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 
? 5612,Susan,21,U,MIS,16 

TYPE ZEROS FOR ALL FIVE VARIABLES TO STOP THE PROGRAM 
TYPE SIX VALUES, ONE FOR EACH VARIABLE: ID, 

NAME , AGE, MARITAL STATUS, MAJOR, CREDIT HOURS 

? 0 , 0 , 0 , 0 , 0,0 


The BASIC statement used by IBM PC for adding data 
into existing file is as follows: 

I 

Ln OPEN ’'filename" FOR APPEND AS channel number 


In this statement, the keyword APPEND is also used 
instead of INPUT or OUTPUT. 
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SEARCHING A FILE : INPUT and IF-THEN Statement 


To access a certain record in the file, we need a 
program which will ask for the value of a field in the 
record and then search each record for that value until the 
record is found. For example, the following program will 
allow you to access any specified stored record in the file. 



PROGRAM 9.6 


10 

REM TO ACCESS STUDENT FILE 


20 

OPEN "STUDENT" FOR INPUT AS 

FILE #1 

30 

FOR K = 1 TO 100 


40 

PRINT "Type the ID number of 

the student you want" 

50 

PRINT "Type zero to stop the 

program" 

70 

INPUT I 


80 

IF 1=0 THEN 170 


90 

FOR K = 1 TO 100 


100 

IF EOF(1) THEN 170 


110 

INPUT #1,Z,W$,B,H$,D$,G 


120 

IF ZOI THEN 150 


130 

PRINT Z,W$,B,H$,D$,G 


140 

GO TO 160 


150 

NEXT K 


160 

NEXT L 


170 

CLOSE #1 


180 

END 
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The output of the above program is as follows: 


OUTPUT 9.6 

Type the ID number of the student you want 
Type zero to stop the program 
? 7736 

7736 Bobbi 21 U MIS 15 

Type the ID number of the student you want 
Type zero to stop the program 
? 4461 

4461 Rod 29 U ACC 06 

Type the ID number of the student you want 
Type zero to stop the program 
? 0 


As shown so far, each record has to be read individu¬ 
ally one after the other. That is, whenever we used an 
INPUT or a PRINT statement each record was read one after 
the other. We could not access the 10th record without 
reading the first nine records. However, to read the 10th 
record, this process discussed so far takes a long time. It 
may not be acceptable in some business or non-business 
applications. Therefore, an efficient method is needed for 
accessing record. A random file does help solve this prob¬ 
lem. 


FILE STORAGE - RANDOM FILE 

A random file can access each record directly without 
accessing the preceding records. A random file works like 
index cards or a rolodex where a card can be selected with¬ 
out searching every preceding card to see whether it is the 
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"j° U vant * In eac h case, the cards are numbered or 
labeled to hold the specific information. For example. 


FIGURE 9.2 


i Tab-Name j 
ID NUMBER 
NAME 


The card contains information on a specific supplier. 

Each card is a record, and each item of information is 
a field. In this record, there are many fields. Each record 
is accessed by locating the tab-name of the card among the 
cards. In BASIC, the accessing is done by identifying each 
record using a record number. The first record is considered 
record number 1 and each subseguent record number is incre¬ 
mented by one. That is, the second record is 2, and so on. 
This type of random file is called a relative file. The main 
advantage of a random file is that it allows a record to be 
moved from disk to CPU without reading each of its preceding 
records. Each record is stored within preassigned storage 
areas. Each storage has its own unigue identification num¬ 
ber. To access a record, we specify the identification 
number of the record number, the identification number of 
storage. For example, to locate number 5, we specify number 
5. 


To create a random file, we must first open a file. 
For a random file, one OPEN statement is sufficient to allow 
the creation, appending, or reading of the file. However, 
each OPEN statement requires that you must determine the 
length of a record before creating a file. For example, our 
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file in Table 9.1 is rewritten to indicate the size of each 
field. 


TABLE 9.4 


File Name : STUDENT 


FIELD NAMES 


ID 


FIRST 

NAME 


MARITAL CREDIT 

AGE STATUS MAJOR HOURS 


FIELD SIZES 


TOTAL 


RECORD# 

4 

10 



1 

7736 

Bobbi 

2 

9753 

Carol 

3 

4283 

Connie 

4 

6699 

Dianne 

5 

3750 

Doug 

6 

4321 

Jane 

7 

0123 

Jeff 

8 

1111 

John 

9 

1006 

Julie 

10 

1122 

Kim 

11 

2048 

Kris 

12 

9110 

Patrick 

13 

9462 

Ricit 

14 

4461 

Rod 

15 

5612 

Susan 


2 

1 

3 

2 

21 

U 

MIS 

15 

20 

M 

MGT 

13 

22 

M 

MIS 

12 

21 

U 

ACC 

15 

22 

M 

MIS 

12 

22 

M 

MGT 

15 

22 

M 

MIS 

12 

22 

M 

MIS 

12 

21 

U 

MGT 

12 

22 

M 

MIS 

12 

22 

U 

MIS 

18 

22 

U 

ACC 

12 

22 

U 

MIS 

15 

29 

U 

ACC 

06 

21 

U 

MIS 

16 


22 character 


Marital Status Code: U = Unmarried M = Married 
Major Code MIS = Management Information System 
MGT = Management, ACC = Accounting 


In this file, ID is specified to be of 4 characters 
fspaces) FIRST NAME is 10 characters, AGE is 2 characters, 
MARITAL STATUS IS 1 character, MAJOR is 3 characters, and 
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CREDIT HOURS is 2 characters. By specifying these sizes for 
the respective fields, we cannot put a value larger than the 
specified size. Adding these sizes shows that the total 
number of characters in each records could, therefore, be up 
to 22. 

Since we know that each record should have a maximum 
of 22 characters, now we are ready to create a random file 
of these records. 

As usual, to create a file, we must first open the 
file. The general form of the OPEN statement is: 


Ln OPEN "R",#number,"filename", length 


In this statement, the statement number (Ln) is fol¬ 
lowed by the Keyword OPEN and the letter R within quotes and 
a comma. R means that we are opening a random file. The R is 
followed by the sign (#) and the channel number and a comma. 
The comma is followed by the filename within quotes and a 
comma. The comma is followed by the length of the record. 
The length is the number of characters in each record. It is 
advisable to create a record of length greater than the 
actual record size in the file. For example, to create a 
random for the above file: 


10 OPEN "R'\ #1, "Studentl", 30 


In this statement, the Student file of size 30 charac¬ 
ters is opened as a random file. 
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Some other versions of the OPEN statement are listed 
in Table 9.5. 


TABLE 9.5 

OTHER VERSIONS OF THE OPEN STATEMENT FOR RANDOM FILE 


SYSTEM STATEMENT 


CDC BASIC none 

BASIC PLUS none 

ANSI BASIC Ln OPEN #number:NAME "filename", ACCESS 

INPUT or OUTPUT , ORGANIZATION RELATIVE 

Microsoft BASIC Ln OPEN "R",^number, "filename", length 

Digital BASIC Ln OPEN "filename" FOR INPUT or OUTPUT AS FILE 

# number ORGANIZATION RELATIVE 


NOTE: When a word is capitalized, you must use that word 
exactly. The file name could be a string of up to 8 
characters. 

Since very few mainframe computers' BASICS create 
random files, my example will be in the context of personal 
computers (PC). The general format of the OPEN statement for 
IBM PC is : 


Ln OPEN "filename" AS channel number LEN = size 


After opening the file, we must specify the size of 
each field in the record. The general form of the FIELD 
statement is: 

Ln FIELD #number, width AS field name, width AS field name 
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* n statement , the statement number (Ln) is fol- 

10 wed by the keyword FIELD and the file number and a comma - 
The comma is followed by the width of a field 
followed by the keyword AS and the field name 
name must be a string variable. All field names of the 
record must be listed in this statement. The FIELD statement 
must come after the OPEN statement. For example, 
file, the FIELD statement would be: 


which is 
Each field 


for our 


10 FIELD #1,4 AS I$,10 AS N$,2 AS A$,l AS S$,3 AS M$,2 AS C$ 


In this statement, the FIELD consists of 4 characters 
for 1$ (ID), 10 characters for N$ (FIRST NAME), 2 characters 
for A$ (AGE), 1 character for S$ (MARITAL STATUS), 3 charac¬ 
ters for M$ (MAJOR), and 2 characters for C$ (CREDIT HOURS). 
These field sizes were defined in Table 9.4. Notice that all 
variables in the field statement are string variables. The 
ID, AGE, and CREDIT HOURS even though they have numeric 
values are labeled as string variables. That is, all varia¬ 
bles in the FIELD statement must be string variables. Howev¬ 
er, if a value has to be numeric, it should be read as a 
numeric but converted to a string value for storage and 
converted back to a numeric after being read from the file 
as a string. However, this requires a different procedure. 
Also, the total width of all fields must be less then or 
equal to the length of the record given in the OPEN state¬ 
ment . 


After the FIELD is defined, the data can only then be 
assigned to each field in the file with either of the fol¬ 
lowing statements. 

Ln LSET string var= string expression or value 

or 

Ln RSET string var= string expression or value 
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In each statement, the statement number (Ln) is fol¬ 
lowed by the keyword LSET or RSET and a string variable, the 
same name as defined in the FIELD statement. The field name 
is followed by the equal sign ( = ) and the string expression 
or value. The LSET is used to assign the string expression 
or the value to left part of the computer memory assigned to 
the field, called left-justified. For example, 


10 LSET L$= "BOBBI" 


In this statement, the name BOBBI is read and stored 
in the first five memory spaces of the ten memory spaces 
assigned to the field L$. The last five spaces in the field 
are filled with blank. After this statement, the computer 
memory assigned to the field L$ would look as follows: 

L$ 

1234567890 


BOBBI 


On the other hand, the RSET assigns the value to the 
right five spaces of the memory (right justified) and 
leaves the five first spaces blank. For example, 


10 RSET L$="BOBBI" 


In this statement, the name BOBBI is read and stored 
in the last five spaces of the ten spaces assigned to the 
field L$. The first five spaces are filled with blanks. 
After this statement, the computer memory assigned to the 
field L$ would look as follows: 

L$ 

1234567890 


BOBBI 
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However, RSET should not be used unless there is a 
specific reason to move the values to the right of the 
memory. That is, the LSET should be used in most cases. 
Also, always use these statements (LSET or RSET) for assign¬ 
ing values to the fields defined in the FIELD statement. Do 
net use INPUT, LET, or READ statements for this purpose, for 
they will cause unforeseen problems. However, you do need 
the INPUT, LET, or READ statement to read data from a file 
or the keyboard. 

As indicated, the LSET and RSET can only use string 
variables. If numeric data is to be read into a field, it 
must be converted into a string character before assigning 
it to a variable in a field defined in the FIELD statement. 
However, the size of the field defined in the FIELD state¬ 
ment to store numeric data as a string data must be at least 
four spaces. The following function statement is used for 
this purpose: 


Ln LSET string var = MKS$(numeric var or constant) 


In this statement, the statement number is followed by 
a keyword LSET and a string variable. The string variable is 
followed by an egual sign which is followed by the function 
MKS$ and a numeric value or a numeric variable. The function 
MKS$ converts the numeric to a four-character string. There¬ 
fore, the field size for the variable defined in the FIELD 
statement must be at least four characters. For example, 


10 OPEN "R", #1, "TEST", 10 
20 FIELD #1, A$ AS 4 
30 A = 25 
40 LSET A$=MKS$(A) 


In statement 30, the variable A is assigned number 25. 
m statement 40 the value of A is stored into the string 
stable A$ by converting the value to a four-character 
string. Notice that the field size of A$ is four. 
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The FIELD statement is also used to identify the 
fields in the record for retrieval. After a record is re¬ 
trieved, then the fields defined in the FIELD statement 
could be assigned to other variables with the LET statement 
or printed as usual. 

However, since all field values are stored as string 
values, a field containing a numeric value needed to be used 
as a numeric value must be converted back to numeric value 
before using it as a numeric value in the program. For t.iis 
conversion, the function CVS is used. For example, to con¬ 
vert the A$ (AGE) back to numeric: 


10 LET K = CVS(A$) 


In this statement, the variable K will now contain the 
numeric value which was stored as a string value in 
the string variable A$. 

The FIELD statement does not store the records in the 
file. Therefore, after assigning a value to each field, the 
record must be stored in the random file. For storing each 
record in the file, the general format of the statement is : 


Ln PUT #number, record 


In this statement, the statement number (Ln) is fol¬ 
lowed by the keyword PUT and the file number and a comma. 
The comma is followed by a record number of the record in 
the file assigned to the record. For example, 


10 PUT #1, 6 
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In this statement, the record is written as record 
number 6 in file number 1. Obviously, if the record had been 
the first record in the file, the record number should have 
been 1 instead of 6. Therefore, most often instead of using 
a constant like 1 or 6, a variable is used to change the 
record numbers. For example, 


50 K = K+l 
60 PUT #1, K 


In these statements, the variable K works as a counter 
which keeps a count of the records read. Each time a new 
record is created the counter changes to account for the new 
record number. 


CREATING A RANDOM FILE 

Let us create a program which will create a random 
file for the file in Table 9.4. 


PROGRAM 9.7 

10 REM TO CREATE A RANDOM FILE 
20 OPEN "STUDENTR" AS 1 LEN =30 

30 FIELD #1,4 AS I$,10 AS S$,4 AS W$,l AS D$,3 AS M$,4 AS T$ 

40 FOR K =1 TO 100 

50 PRINT "Type six values - id, name, age, marital status" 

60 PRINT "major, credit hours per semester. Type zero to stop" 
70 INPUT I,N$,A,S$,M$,C 
80 IF 1=0 THEN 170 
90 LSET I$=MKS(I) 

100 LSET S$=N$ 

110 LSET W$=MKS$(A) 

120 LSET D$=S$ 

130 LSET R$=M$ 

140 LSET T$=MKS$(C) 

150 PUT #1,K 
160 NEXT K 
170 CLOSE #1 
180 END 
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In this program, the STUDENTR file is opened in state¬ 
ment 20 with record size of 30 spaces. The FIELD is declared 
in statement 30. Variable 1$ is of size 4, S$ of size 10, A$ 
of size 4, D $ of size 1, M$ of size 3, and T $ of size 4. 
Values for each record are inputted in line 70. In lines 90, 
110, and 140, the numeric variables I, A, and C are convert¬ 
ed into string variables by using MKS$ function. The input¬ 
ted string variables N$, S$, and M$ are just assigned to the 
declared fields in the FIELD statement. After assigning each 
inputted value to the variables in the FIELD statement, the 
record is written in the file in line 150. Notice that the 
variable names used in line 70 are different than the varia¬ 
bles used in the FIELD statement. In line 150, the PUT 
statement along with the K variable assigns a record number 
to each record as they are written in the file. Line 170 
closes the file. 

The output of the program would look as follows: 


OUTPUT 9.7 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 

? 7736,Bobbi,21,U,MIS,15 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 

? 9753 ,Carol,20,M,MGT,18 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 

? 4283,Connie,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 

? 6699,Dianne,21,U,ACC,15 

Type six value — id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 

? 3750,Doug,22,M,MIS,12 

(continued) 
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READING A RANDOM FILE 

Once a file is created, it could then be read. The 
following program shows how to read a random file. 


PROGRAM 9.8 

10 REM TO READ THE FILE 

2 0 OPEN "STUDENTR" AS 1 LEN = 30 

30 FIELD #1,4 AS I$,10 AS S$,4 AS 

40 FOR K =1 TO 100 

50 GET #1, K 

60 LET I=CVS(I$) 

70 LET C=CVS(T$) 

80 LET A=CVS(W$) 

90 PRINT I,N$,A,S$,M$,C 
100 NEXT K 
110 CLOSE #1 
120 END 
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As shown in the above program, the file must be opened 
as a random file. The FIELD statement defines the field 
names and sizes. The field sizes must match the sizes de¬ 
fined in the FIELD statement when the file was created. 
However, to read a random file, use the GET statement. The 
general format of the GET statement is: 


Ln GET ^channel number, record number 


In this statement, the line number (LN) is followed by 
the keyword GET and a channel number used in the OPEN state¬ 
ment. The channel number is followed by a comma and the 
record number of the record you want to read. Statement 50 
in the above program is an example of the GET statement. 
This statement will read one record at a time depending upon 
the value of K. 

In the above program, the file is opened to be read. 
Line 50 reads each record and lines 60 through 80 converts 
the string values back to numeric values by using CVS func¬ 
tion. Line 90 prints each record. The output of the above 
program is as follows: 


OUTPUT 9.8 

7736,Bobbi,21,U,MIS,15 
9753,Carol,20,M,MGT,18 
4283,Connie,22,M,MIS,12 
6699,Dianne,21,U,ACC,15 
3750,Doug,22,M,MIS,12 
4321,Jane,22,M,MGT,15 
0123,Jeff,22,M,MIS,12 
1111,John,22,M,MIS,12 
1006,Julie,21,U,MGT,12 
1122,Kim,22,M,MIS,12 
2048,Kris,22,U,MIS,18 
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In this output, each record was read and printed. 


ACCESSING A RECORD IN RANDOM FILE 

Most often a certain record is needed to be read and 
P r ^- n ^ e< ^ instead of the whole file as shown in the previous 
program. Therefore, let us write a program showing how to 
access a record in a random file. For example. 


PROGRAM 9.9 

10 REM TO SEARCH A RANDOM FILE 

20 OPEN "STUDENTR" AS 1 LEN = 30 

30 FIELD #1,4 AS I$,10 AS S$,4 AS W$,l AS D$,3 AS M$,4 AS T$ 

40 FOR K =1 TO 100 

50 PRINT "Type the record number you want to see" 

60 PRINT " Type zero to stop." 

70 INPUT I 

80 IF I = 0 THEN 170 

90 IF I< 1 THEN 50 
100 IF I> 10 THEN 50 
110 GET #1, I 
120 LET I=CVS(I$) 

130 LET C=CVS(T$) 

140 LET A=CVS(W$) 

150 PRINT I,N$,A,S$,M$,C 
160 NEXT K 
170 CLOSE #1 
180 END 


In this program, you are to enter the record number, 
and then the computer searches the file to access the record 
by matching the record number with the record number in the 
file. When the record is found, the record is printed. Since 
we have only ten records in the file, therefore, if you type 
a number greater than 10 or less than one, the computer asks 
for the number again. 
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The output of the program would look as follows: 



OUTPUT 

9.9 


1 

Type 

the record number 

you want 

to see 

Type 

zero to stop 



? 3 




4283 

Connie 22 M 

MIS 

12 

Type 

the record number 

you want 

to see 

Type 

zero to stop 



? 8 




1111 

John 22 M 

MIS 

12 

Type 

the record number 

you want 

to see 

Type 

zero to stop 



? 0 





UPDATING A RANDOM FILE 

Updating means changing existing records or adding new 
records in the file. In a random file, data can be changed 
in the existing file or new records could be added to the 
file. Updating of the existing record could be done by 
simply retrieving a record and changing values and putting 
it back. When a new record is stored in the same place, the 
old record is deleted. Adding a record can take place by 
simply identifying a new record number where the new record 
will be place without affecting the existing records. For 
example, the following program shows how to add new records 
to the file. 
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10 

PROGRAM 9.10 

REM TO UPDATE A RANDOM FILE 


20 

OPEN "STUDENTR" AS 1 LEN =30 


30 

FIELD #1,4 AS 1$,10 AS S$,4 AS W$,l AS D$,3 AS 

M$,4 AS T$ 

40 

FOR K =1 TO 100 


50 

PRINT "TYPE RECORD NUMBER. TYPE ZERO TO STOP" 


60 

INPUT L 


70 

IF L=0 THEN 210 


80 

PRINT "Type six values - id, name, age, marital 

status" 

90 

PRINT "major, credit hours per semester." 


100 

INPUT I,N$,A,S$,M$,C 


110 

LSET I$=MKS(I) 


120 

LSET S$=N$ 


130 

LSET W$=MKS$(A) 


140 

LSET D$=S$ 


150 

LSET R$=M$ 


160 

LSET T$=MKS$(C) 


170 

PUT #1,L 


180 

NEXT K 


190 

CLOSE #1 


200 

END 



In the program, beside inputting data in the record, 
you are also asked to input the record number. This number 
is needed for storing the record in a particular location. 
However, keep in mind you must remember the number of re¬ 
cords you had entered previously. If in case you enter the 
number of the existing record, the computer replace the old 
record with the new record. 
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The output of the program is as follows: 


OUTPUT 9.10 

TYPE RECORD NUMBER. TYPE ZERO TO STOP 
? 11 

Type six values - id, name, age, marital status 
major, credit hours per semester. 

? 2048,Kris,22,M,MIS,12 
TYPE RECORD NUMBER. TYPE ZERO TO STOP 
? 12 

Type six values - id, name, age, marital status 
major, credit hours per semester. 

? 9110,Patrick,22,U,ACC,12 
TYPE RECORD NUMBER. TYPE ZERO TO STOP 
? 13 

Type six values - id, name, age, marital status 
major, credit hours per semester. 

? 9462,Ricit,22,U,MIS12 

TYPE RECORD NUMBER. TYPE ZERO TO STOP 

? 14 

Type six values - id, name, age, marital status 
major, credit hours per semester. 

? 4461,ROD,29,U,ACC,06 

TYPE RECORD NUMBER. TYPE ZERO TO STOP 

? 15 

Type six values - id, name, age, marital status 
major, credit hours per semester. 

? 5612,Susan,21,U,MIS,16 
TYPE RECORD NUMBER. TYPE ZERO TO STOP 
? 0 


All of the examples of the random file were based on 
the relative record concepts. That is the first record was 
number 1, the second record was number 2, and so on. There¬ 
fore this means that you must remember the record number of 
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record in the file. This requires keeping a list of records 
on a piece of paper to make reference about number of re¬ 
cords or listing file to find out the record locations. 
However, this method of locating a record is inconvenient 
for many users. Therefore, a better method for locating a 
record would be to use the primary key field of each record. 
For example, the ID number of a student or an employee or a 
part number of an inventory could be used as a reference to 
a record. Therefore, it is better to use the primary key as 
a record number. However, the disadvantage of this method is 
that a file with ten records may require a file of size 9999 
records if a key field is of size four digits. For example, 
by storing our file under the primary key method, we will 
use ID field as a key. In this field, each record has a 
four-digit number. Therefore, we will be creating a file of 
size 9999 records, even though we have ten records in the 
file. Thus, a record with an ID number 9753 will be placed 
in the 9753th position of the file, and a record with ID 
number 1111 will be stored in the 1111st position of the 
file. 


The following program shows the primary key method for 
storing a file: 



PROGRAM 9.11 



10 

REM TO CREATE A RANDOM FILE 



20 

OPEN "STUDENTR" AS 1 LEN =30 



30 

FIELD #1,4 AS I$,10 AS S$,4 AS 

W$,l AS 

D$,3 AS M$,4 AS T$ 

40 

FOR K =1 TO 100 



50 

PRINT "Type six values - id, name, age, 

marital status" 

60 

PRINT "major, credit hours per 

semester 

. Type zero to stop" 

70 

INPUT I,N$,A,S$,M$,C 



80 

IF 1=0 THEN 180 



90 

LSET S$=N$ 



100 

LSET W$=MKS$(A) 



110 

LSET D$=S$ 



120 

LSET R$=M$ 



130 

LSET T$=MKS$(C) 



140 

PUT #1,1 



150 

NEXT K 



160 

CLOSE #1 



170 

END 
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In this program, the value of the variable I is used 
as a record number. Since this record number could always 
be printed, we do not have to store it as a field in the 
file. The output of this programs is follows: 


OUTPUT 9.12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 7736,Bobbi,21,U,MIS,15 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 9753,Carol,20,M,MGT,18 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 4283,Connie,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 6699,Dianne,21,U,ACC,15 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 3750,Doug,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 4321,Jane,22,M,MGT,15 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 0123,Jeff,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 1111,John,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 1006 ,Julie,21,U,MGT,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 1122,Kim,22,M,MIS,12 

Type six value - id, name, age, marital status 
major, credit hours per semester. Type zeros to stop. 
? 0 , 0 , 0 , 0 , 0,0 
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Let us write a program to read the file created above: 


PROGRAM 9.12 

10 REM TO ACCESS A RECORD IN RANDOM FILE 
20 OPEN "STUDENTK" AS 1 LEN =30 

30 FIELD #1,4 AS I$,10 AS S$,4 AS W$,1 AS D$, 3 AS M$,4 AS T$ 
40 FOR K =1 TO 100 

50 PRINT "Type the ID number of the student" 

60 PRINT " Type zero to stop." 

70 INPUT I 
80 IF I = 0 THEN 170 
90 IF I< 1 THEN 50 
100 IF I> 9999 THEN 50 
110 GET #1, K 

120 IF lOK THEN PRINT "THE RECORD DOES NOT EXIST" 

130 IF IOK THEN 50 
140 LET C=CVS(T$) 

150 LET A=CVS(W$) 

160 PRINT I,N$,A,S$,M$,C 
170 NEXT K 
180 CLOSE #1 
190 END 


In this program, the ID number is entered and the file 
is searched to check whether such a record exists, if it 
exists, the record is printed and if the record does not 
exist, the message is printed and you are asked to enter 
another record number. The output of the above program is as 
follows: 


(next page) 
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1 . 


2 . 

3. 

4 . 


5. 


6 . 

7. 

8 . 

9. 


10 . 


11 . 


QUESTION 

fil^? ^ 3 computer file, and why do we need a computer 

fo^ in Giv e f ini d in a 1 Computer file * What is a field used 
ror> Give some examples of a field. 

represent? eC ° rd 3 computer file - What does a record 


What is a key field and why is it needed? 


Can any field be used as a 

What are the differences 
nonsequential file? 


key field? 

between a sequential and an 


Discuss situations where one will use sequential files. 
What are the steps needed to create a nonsequential file? 
What are the steps needed to create a sequential file? 
List three types of OPEN statements. 

What are the differences between the PRINT and the WRITE 
statements? 


12. Are the steps in creating a sequential file different 
than from the steps in creating a nonsequential file? 
Discuss with examples. 

13. Create a customer file for a company with the following 

fields. y 


Field Name 


Field Type 


Name Character 
Street Address Character 
City Character 
District Character 
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p.O. Office Code 
Province 

Type of Business 
Credit Rating Code 
Size of Business 
Sales Quantity 
Sales Amount 


Numeric 

Character 

Character 

Numeric (Good = 1, Bad = 0, Delinqucn 
Numeric (Sales in millions of rupees) 
Numeric (Quantity the customer buys) 
Numeric (Amount in rupees) 


Create ten customers and store the records in the file 


14. Write a program that updates the above file Shov 

output by adding three new customers and print the wnoi 

file. 

15 Write a program that deletes records. Show the output by 
deleting^the records of the first and the fourth custom- 
ers from the file, who have gone out of business. 


16. Write a program that locates rec ° r . d . s /" ^ c f “tomer h ° W 
the output by locating the name of the third customer. 

17. The customer in the fifth record in the file moved from 
one province to another; change the address of the 

. customer^Tn the record. Print the whole file to make 
sure that the change has been made correctly. 


18. 


create a random customer file for a company with follow 
ing fields. 


Field Name 


Field Type Field Size 


Last Name 
First Name 
Street Address 
City 

District 

p.O. Office Code 
Province 


Character 

Character 

Character 

Character 

Character 

Numeric 

Character 


15 

15 

25 

15 

10 

5 

5 
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Type of Business Character 10 

Credit Rating Code Numeric 

(Good = 1, Bad = 0, Delinquent =0) 1 

Size of Business Numeric 

(Sales in millions of rupees) 10 

Sales Quantity Numeric 

(Quantity the customer buys) 6 

Sales Amount Numeric 

(Amount in rupees) 10 


Create ten customers and store the records in the file. 


19 


20 


21 


22 


23 


24 


25 


26 


cutout h„ P ^T ai " !!? at updates the above file. Show the 
file Y dd ng three new customers and print the whole 

deiltina P £h 9rai ’ th ^ fc deletes records, show the output by 
e« S fh. ,u t4S K° f the first and the f ™rth custom- 
business ' because the y h ave gone of out of 

Write a program that locates records in the file Show 
the output by locating the name of the third customer 

The fifth customer in the file moved from one province 

to another. Change the address of the fourth custnme-r 

nnt the whole file to make sure that the chanqe has" 
been made correctly. n ge nas 

What is a random file? Is a random file better than 
sequential file? ecrer than a 

Are the steps required to create a random file different 
from the steps to create a nonsequential file? 

What are the differences in creating a sequential fiu 
and creating a random file? iai fllfe 

Write a program that copies an existing sequential tsi 
to another sequential file. 1 flle 
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27. Write a program that stores data in a file for the 
following fields and processes payroll at end ol the 
month. The program should accept hours worked during 
month and then should calculate gross pay and income 
deductions for each employee. 


Field Name 


Last Name 
First Name 

Department Number, where the employee works 

Street Address 

City 

P.0. Code 
Rate Per Hour 
Employee Code 


28. Write a program that keeps an account ° f . ^ ° r U ^^ee 
hudaet The program should use a file tha 
fields:' the budget item name, the menthly budget for the 
item, and the monthly expenses for each item. For_ exa™ 
n 1 p one of the budget items named could be rent for 
Shich you have budgeted Rs. 2000.00 a month. The program 
Sould ask for actual monthly expenses and should update 
the file and should print a monthly report showing your 
budget item name, monthly budgeted expenses, and actual 

monthly expenses. 
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A 


Abnormal, 241, 242 
ABS, 186, 188, 206, 217 
Absolute, 186, 188, 189 
Addition, 194, 237 
Address, 57, 231 
Algebraic, 18, 37 
Algorithm, 43, 44, 184 
All-purpose, 18 

Alphabet, 23, 26, 28, 51, 56, 229 

Alphabetic, 25, 58, 88 

Alphanumeric, 28, 56, 59, 83 

ALU, 2, 5 

APPEND, 246 

Appending, 251 

Applesoft, 26 

ANSI, 19, 234 

Arctangent, 186, 188 

Argument, 185, 187, 196, 198 

Arithmetic, 5, 24, 29, 33, 37 

Arrays, 48, 157, 167, 168, 244, 245 

Artificial, 1 

Ascending, 102, 165, 221 

ASCII,5, 104, 194, 195 

Assignment, 30, 32, 56, 199 

ATN, 186, 188 


B 


BIOS, 6 
Binary, 5 
Bits, 5 

Built-in, 6, 184, 188, 196, 197 
Byte, 5, 7, 8, 10 
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C 


CAI, 1 

Cassette, 6, 10, 12 
Cathode, 12 
Cell, 172 

Chain, 11, 212, 213, 217, 222 

Characters, 5, 24, 51, 79, 85, 89, 170, 192, , 

Chip, 6 

Code, 5, 18, 43, 45, 194, 195, 230, 252 

Commands, 26, 45 

Compilation, 18 

Compiled, 14, 50 

Compiler, 14, 26, 50, 69 

Concatenate, 191 

Concentric, 8 

Conditionals, 115 

Conditions, 100, 106, 114, 119, 133 
Configuration, 2, 12 

Constant, 103, 128, 160, 172, 257, 259 

Conversational, 19 

Conversion, 14, 258 

Convert, 260 

COS, 186, 188 

COSINE, 188 

Count, 85, 86, 259 

Counter, 259 

CPU, 2, 5, 25, 251 

CR, 49 

CRT, 11, 12 

CUMULATIVE, 204, 207, 215, 218 
Cursor, 13, 60, 83, 195 
CVS, 258, 261, 263, 269 


D 


Debug, 43, 
Debugging, 
Debugging, 


50, 200 
200 

47, 50, 83 
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Decimal, 189 
Declaration, 69 
Declarative, 48 
DEF, 196 
Default, 27 
Defined, 184, 196 
Density, 7 

Descending, 102, 165, 206, 211, 216 

Device, 2, 5, 6, 11 

Diagnoses, 1 

Diagnostic, 23 

Diagram, 19, 20 

Digit, 5, 21, 26, 29, 85,88, 90, 228, 267 
Digital, 234, 237, 254 

DIM, 161, 165, 170, 175, 204, 206, 211, 215, 213, 220, 244 
DIMENSION, 157 
DIMENSIONAL, 161 

Disk, 6, 7, 8, 9, 44, 213, 228, 231, 251 

Diskette, 6, 7, 18, 228, 232 

Documentation, 48, 49 

Dot-matrix, 11 

Double, 112 

Double-precision, 28 

Double-sided, 7 

Drive, 6, 7, 8 

DS, 7 

DSDD, 7 


E 


E-Type, 22 

EBCDIC, 5, 104 

Echoing, 60 

Editing, 12, 47, 51 

Embedded, 20, 83 

END, 188, 190, 200, 201 

End-of-file, 104 

EOF, 104, 241, 249 

Equation, 107, 113, 120, 158 

Error, 98, 99, 134, 135 
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Errors, 135 
Executable, 202 

Executed, 190, 198, 201, 213, 228, 239, 247 
Executing, 202, 212, 241 

Execution, 19, 25, 26, 27, 47, 50, 55, 59, 83 

Exponent, 21, 22, 23 

Exponential, 20, 21, 22, 23, 25 

Exponentiation, 22 , 33 

Exponentiations, 34 

Exponents, 21 

Expression, 20, 30, 33, 45, 47, 83, 86 

Extended, 5 
External, 5 


P 


Factors, 21 






Field, 228, 232 

, 249 

, 251, 252 

, 254 


File, 228, 237, 

238 





Filename, 232, 

237, 

240, 

246, 

248, 

253 

Files, 6, 222, 
Fixed, 145 

232, 

233, 

235, 

240, 

254 

Floating, 21, 88 





Floppy, 6, 7 
Flowchart, 44 
Format, 46, 51, 
Formatting, 12 

65, 

75, 

87, 89 

, 171 

, 175 

Formula, 44 
Fractional, 90, 

131 





Fractions, 20, 
Full-height, 7 

27 





Function, 133, 

186, 

187, 

192, 

194 



G 


GET, 98, 240, 261, 269 
GIGO, 55 

GOSUB, 201, 205, 208, 215, 218 

GOTO, 18, 51, 97, 101, 106, 127, 134, 201, 207, 209, 210 215 
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H 


Half-height, 7 
Hard-wired, 6 
Hardware, 2, 5, 13, 50 
Hierarchy, 34 
Higher-level, 50 


I 


IF-THEN, 242, 249 
Inary, 5 

Increment, 128, 130, 135 

Index, 128, 131, 133, 136, 140, 150, 163, 173 
Initial, 107, 128, 133, 144, 164 
Initialization, 51, 110, 117, 173 
Initialize, lio, 117 
Innermost, 146 

109 ' 112 ' 117/ 119 ' 120 ' 140 ' 204 ' 207 ’ 211, 215, 

61.0 i Z Z 1 f 231 

Inputted, 11 , 12, 24, 44, 47, 55, 57, 61 
Inputting, 58, 60, 63, 265 
INT, 187, 207, 217, 219 

Integer, 20, 23, 25, 30, 46, 80, 84, 186, 

Interactive, 50, 232 
Interchange, 5 
Interpreter, 14, 25, 50, 69 
Intervention, 173 

INVALID, 20,29, 37, 55, 134, 135, 147 


X 


K’s, 5 

Key, 230, 244, 267 
Keyboard, 11, 18, 56, 60, 98 
Keys, 12, 13 
Keystrokes, 56 

Keyword, 57, 65, 73, 76, 83, 97, 102, 111, 115, 161, 171 
196, 202, 213, 233, 236, 240, 242, 246 
Kilobytes, 5 
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L 


Label, 148, 159, 162, 163 
Laser, 11 
Leading, 193 
LEFT, 192, 256 
Left-justified, 256 


LEN, 194 

, 254 

, 259, 261, 

263, 

265, 

267, 

269 

Length, 

194, 

251, 253 





Limited, 

102, 

166 





Line, 97 

, 108 

, 110, 113, 

117, 

119, 

120, 

127 


List, 116, 120, 137, 141, 159, 170, 214, 236, 240, 267 
Load, 212, 222 

LOG, 187 
Logarithm, 187 

Logical, 14, 33, 37, 38, 51, 114, 116 
Logically, 44, 47 

Loop, 98, 100, 104, 107, 127, 133, 137, 144, 150 
Looping, 98, 127 
LPAD, 193 

LSET, 255, 259, 265, 267 
LTRM, 193 
LWRC, 196 


M 


Machine-readable, 14 
Magnetic, 7, 10, 12 
Magnetized, 8 

Mainframe, 4, 6, 26, 29, 87 
Manipulation, 160 
Match, 262 
Matching, 263 

Mathematical, 30, 33, 38, 184, 191, 197 
Matrix, 149, 157, 160, 170, 184 
Maximum, 161, 171, 210, 220, 253 
Memory, 157, 162, 171, 175, 198, 233, 257 
Microcomputer, 6, 12, 50, 74 
Microsoft, 26, 28 
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MID, 192 

MIDPOINT, 208, 212, 218, 219, 219 

Modular, 101 

Modules, 101 

Monitor, 11, 13 

Monochrome, 12 

Multiplication, 33, 34 


N 


NAME, 112, 157, 161, 170, 174 
Naming ,26 

NEXT, 101, 103, 107, 110, 113, 117, 119, 127, 130, 188, 190, 202, 

204, 207, 210, 216 

Non-CRT, 12 

Non-scientific, 28 

Number, 97, 101, 105, 107, 111 

Numbered, 132, 133 

Numbers, 99, 100, 104, 128, 137, 157, 160, 162, 187, 190, 230, 

235, 246, 259 

Numeric, 13, 19, 20, 24, 27, 30, 34, 37, 45, 102, 128, 160, 170 

,185, 195, 255, 257, 260, 262 
Numerical, 20, 37 



Object, 14, 50 


OPEN, 232, 234, 238, 

241, 

243, 

246 ( 

, 249 

Operands, 33, 36 





Operation, 14, 33, 34 

, 35, 

45, 

46, 

60 

Operational, 13, 47 





Operations, 185, 191, 

231 




Operator, 33, 34, 36 

, 37, 

38, 

57, 

115 


OPTION, 162 
ORD, 194 
Ordering, 165 

Output, 11, 99, 100, 105, 110, 113, 118 
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P 


Partial, 51 
Posttest, 127 
Predefined, 104 
Pretest, 127 
PRIMARY, 2, 5, 6 

PRINT, 96, 102, 109, 112, 188, 199, 202, 208 

Printer, 11, 83, 91 

PROCEDURES, 43 

Programmable, 6 

Programmed, 6, 12, 55 

Programmer, 6, 14, 18, 25, 44, 48, 56, 59, 98, 

159, 161 
PROM, 6 

PROMPTED, 206, 211, 216 
Pseudo-random, 189 
Punctuation, 18 
PUT, 237, 253, 258, 265, 267 


100 , 


113, 13 


Q 


Quotation, 23, 60, 67, 87 
Quote, 24, 213, 233, 237, 253 


R 


Radians, 186 


RAM, 6 

Random, 187, 191, 231, 250, 253, 258 
RANDOMIZE, 190 


Random-Access, 6 
RANGE, 205, 211, 217 
READ, 198, 202, 204, 214, 228, 
Real, 15, 20, 23, 27, 29, 88 
Record, 228, 232, 236, 240, 244 
Reference, 170, 172 


231 
, 249 
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Relation, 116 

Relational, 37, 38, 101, 110, 115 

Repeat, 96, 101, 128, 129 

Repetition, 189 

Reserve, 26 

Reserved, 25, 47, 48 

Restore, 73, 76 

Retrieve, 230 

Return, 184, 187, 197, 200, 203, 206, 

REUSE, 246 

Reverse, 187 

RIGHT, 192, 196, 256 

RND, 187, 190 

ROM, 6 

Robots, 1 

Routine, 201, 202 

RPAD, 193 

RPG, 14 

RPT, 194 

RSET, 255, 257 

RTRM, 193 

Run, 190, 216, 222, 228 


8 


Save, 13, 51 

Scientific, 21, 22 

Screen, 195, 239, 247 

Search, 249, 263 

Secondary, 2, 5, 6 

Security, 28 

SEED, 190, 191 

Sentinel, 104, 106 

Sequence, 96, 101, 128 

Sequential, 30, 96, 97, 101, 165 

SGN, 187, 189 

Significand, 21, 23 

Significant, 26, 28 

Single-precision, 28 

Sort, 213, 244 
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Sorted, 244, 245 
Sorting, 230, 244 
Spacing, 46, 77, 83, 85, 86 
SQR, 185, 188, 197 
STACK, 209, 210, 221 

STATUS, 229, 236, 238, 244, 247, 252, 25b 

STEP, 128, 133, 137, 164 
Steps, 100, 101 

STOP, 201, 203, 212, 238, 241, 244, 247 
Storage, 163, 228, 231, 250, 255 
String, 102, 104, 184, 191, 196, 233, 254, 
Structure, 101, 200 
STRUCTURED, 96, 100, 101, 127 
SUBPROGRAMS, 184 

SUBROUTINE, 200, 203, 206, 210, 218 

SUBSCRIPT, 160, 170, 172 

Subscripted, 164 

Subscripts, 160, 171 

Substring, 191, 192 

Symbolic, 18 

Symbols, 25, 33, 34, 87, 91 
Syntax, 171, 18, 43, 45, 50 
System, 2, 6, 14, 16, 26, 29, 57, 73, 


256 


T 


TAB, 83, 86, 208, 219 
Table, 103, 111, 116, 
Tabulator, 83 
Tape, 6 , 10, 11, 44 
Terminal, 44, 56, 57 
Terminate, 99 
Terminated, 98, 105, 
Termination, 49, 98, 
Terminology, 19 
Tested, 107, 127, 129 
Testing, 100, 129 
Tests, 101, 104, 108 
Time-sharing, 50 
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Top-down, 101 
Track, 7, 8, 9 
Trailer, 104 
Trailing, 193, 67, 90 
Transfer, 213, 214, 242 
Translates, 14 
Translating, 45 
Translation, 50 
Truncated, 187 
Truncation, 194 
Two-dimension, 175 
TWO-DIMENSIONAL, 170 
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UNDEFINED, 98, 102 
UPRC, 196 
Undefined, 77 
User-defined, 26 
Users, 11, 18, 19, 47 
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VAL, 195 

VALIDITY, 55, 56 

Valid, 20, 21, 23, 27, 29, 37 

Variables, 25, 31, 33, 37, 45, 49, 103, 107, 110, 117, 128, 132 
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Word, 30, 47, 65, 86, 90, 97, 111, 116, 129 
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Q/ltfoul (Ae, S8otd 


The contemporary world is in the midst of a Computer Revolution 
that has overshadowed the Industrial Revolution. The computer 
revolution has already affected everyday life and has greater 
potential to impact lives of people in many predictable and 
unpredictable ways. Its effect on human life and economy are now 
more manifestly visible in industry, education, health, agriculture, 
communication and a host of other significant areas. 

This wonderful book provides an introduction to the BASIC 
programming language, starting out with a general discussion 
of the computer hardware and software. 

Systematically divided into nine selfcontained chapters the book 
provides an easy-to-understand and easy-to-apply material for 
all those interested in the mysteries and marvels of the almighty 
computer. 

I 

Q/ltfoul oAu/Ao^i 


The author, Dr. Syed Shahabuddin, holds the highest professional 
qualifications in the field and is presently serving on the staff 
of a reputed American university as Professor of Management 
Information System and Management Science. 



Scanned by 




